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Basic-Kurs 



Basic 2.0 - nicht nur fur Einsteiger! 

Unser groBer Basic-Kurs zum 
Mitmachen (mehr als 40 Beispielpro- 
gramme!) erklart auch, was nicht im 
Handbuch steht. 

Alphabetische Ubersicht der 
Basic-2.0-Befehle mit 
Kurzbeschreibung 

DIM: Variablen und Arrays 



12 



INPUT: Eingabensteuerung 



13 



GET: Eingabe per Tastatur 



14 



IF-THEN: Basic fallt Entscheidungen 14 
AND/OR/NOT: logische Verknupfungen 14 
ON...GOSUB/ON...GOTO: verzweigen 15 



GOTO: unbedingte Sprtinge 
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GOSUB-RETURN: Aufruf von 
Unterprogrammen 



15 



FOR-TO-STEP-NEXT: Schleifen 



16 



Tl und Tl$: Zeitmessung im C64 
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RND( ): Zufallszahlen erzeugen 



17 



INT: Nachkommastellen entfernen 



22 



DATA: Datenbank im Basic-Programm 23 



READ: Datenwerte im Programm 



23 



RESTORE: Datenzeiger setzen 



23 



POKE: Speicherstellen belegen 



25 



PEEK: Speicherinhalte lesen 



25 



SYS: Maschinenprogramme aufrufen 26 
USR: Basic und Maschinensprache 27 



OPEN: Dateien offnen und anlegen 28 



PRINT #: Eintrage in die Datei 



29 



CLOSE: Dateien schlieBen 



29 



INPUT # : Dateien lesen und laden 



29 



GET # : Dateien in den Speicher holen 
(der andere Weg) 29 

Der Grafikatlas: hochauflosende Grafik 
mit Basic 2.0 30 



Knobelecke 



Auflbsung der Knobelecke 4 

Vorstellung des Siegerprogramms 

»Beste Wege« H 32 



Tips & Tricks 



Was das Handbuch verschweigt. 

Diese Kniffe der Programmierprofis 
haben's in sich: Sie machen Basic- 
Programme pfiffig und elegant, An- 
fanger kommen schneller ans Ziel. II 35 



Unsere Programmauswahl: 
Von Grafikbanken und -punkten: 

Grafikpixel auf der Bitmap setzen. 

Neuer Zeichensatz gefallig? 

»Char-Lader« stattet Ihren C64 mit 
zwei neuen Zeichensatzen aus. 

Bremsfallschirm: 

»Bildsch.langsam« verringert die 
Geschwindigkeit jeder 
Bildschirmausgabe! 



Bildschirm- und ASCII-Codes: Die 

Umrechnung der Zahlenwerte 

ubemimmt unser Utility »BS/ASCII- 

Code«. H 36 
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C64 mit Rolladen: Komfortable Pull- 
Down-Menus in eigene Basic- 
Programme integrieren 



36 



Es geht abwarts: Mit dem Aufruf einer 
Systemroutine lassen sich beliebige 
Bildschirmzeilen scrollen H 36 

Zahlenumrechnung: Zu jedem 
Dezimalwert die Hexadezimal- und 
Binarzahl H 36 



Automatische Zeilennumerierung: 

Lastiges Eintippen der Zeilen- 
nummern entfallt mit »Auto.Bas« 



37 



Eingabehilfe fur Einzeiler: durch Mani- 
pulation einer Systemroutine bis zu 
88 Zeichen pro Basic-Zeile! II 37 

Als die Bilder laufen lernten: Text und 
Blockgrafik scrollen in alien vier 
Richtungen auf dem Bildschirm. II 37 



Superschnelles Directory: Die Basic- 
Routine »Dir.Bas« zur Directory- 
Ausgabe schnell wie Assembler! H 37 

Restore in Basic: Auch in Basic geht's: 
"Restore. Bas« zeigt, wie man den 
Data-Zeiger trickreich verbiegt. H 37 

Dezimaler Disassembler: Es geht auch 
ohne Maschinensprachemonitor: 
»minidisass« und die PEEK-Werte II 50 

Null Problemo: Wer bei der Bild- 
schirmausgabe von Zahlenlisten Pro- 
bleme hat, dem hilft »Nullen« weiter. II 50 



Basic-Erweiterungen 



Nichts ist unmoglich 

Ob Block- oder Hires-Grafik, animierte 
Sprites und strukturierende 
Programmierbefehle: »Sprite+Grafik- 
Basic« macht durch mehr als 100 neue 
Anweisungen jeden C64zum 
Grafikkunstler. U 38 

Der elegante Weg 

XBasic Plus bietet Ciber 40 kraftvolle 

Befehle, die jede Programmier- 

arbeit zum Kinderspiel machen H 43 
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Grafik: Basic-Erweiterung der Extra- 
klasse: Sprite+Grafik-Basic Seite 38 
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Alle Programme aus Artikeln mit einem ■■ -Symbol finden 
Sie auf der beitiegenden Diskette (Seite 19) 
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von Dr. H. Hauck/ 
Ch.Bergmann/H.Beiler 

■ asic, Abkurzung von 
»Beginners All-purpose 
' Symbolic Instruction 
Code«, bedeutet wortlich 
ubersetzt: Einsteiger-Pro- 
grammiersprache fur jeden 
Zweck. 

Auf den Punkt gebracht: 
Auch Basic laBt sich so ge- 
schickt einsetzen , daB es vie- 
len Maschinenprogrammen 
kaum nachsteht - abgese- 
hen von der Geschwindig- 
keit. Die Grunde sind be- 
kannt: Die meiste Zeit fur ein 
Basic-Programm vergeudet 
der Computer mit der Uber- 
setzung der Befehle (z.B. 
PRINT, GOTO, GOSUB usw.) 
durch den Basic-Interpreter. 
Das ist der Preis, den man 
fur diese klar verstandliche 
Programmiersprache bezah- 
len muB: Jeder Basic-Befehl 
wird namlich zuerst vom 
Computer identifiziert, ein- 




Keine Angst vorm 
Programmieren! 
Es mufi ja nicht 

gleich Maschinen- 

sprache sein . . . 

Staunen Sie, was 

man mit Basic al- 

les anstellen kann. 

geordnet und die entspre- 
chende Maschinensprache- 
routine im Betriebssystem 
aktiviert - ein Haufen Action! 
Trotzdem ist Basic fur die 
meisten C-64-Besitzer die 
einzige Kommunikations- 
moglichkeit mit dem Compu- 
ter. Wenn man auBerdem ein 
Basic-Programm gut struktu- 
riert, umstandliche Routinen 
vermeidet und sauber pro- 
grammiert, ist bei normalen 
Anwendungsprogrammen 
(z.B. Dateiverwaltung, Text- 
und Bildschirmausgaben 
usw.) gar nicht so leicht ein- 



zusehen, warum der Basic- 
Programmierer unbedingt 
auf Assembler umsteigen 
sollte. 

Bei unserem Kurs setzen 
wir voraus, daB Sie die 
Schwellenangst uberwun- 
den und sich doch schon mal 
als Programmautor versucht 
haben. Ebenso sollten Sie 
sich in den Tastaturfunktio- 
nen und der Speieherbele- 
gung des C64 einigermaBen 
auskennen. Wir wollen aber 
nicht die Informationen des 
Handbuchs zum C64 neu 
aufwarmen, sondern sie er- 
ganzen! 

Zu unserem Kurs finden 
Sie eine Menge Beispiel- 
programme auf der Disket- 
te zum Sonderheft. In 
iibersichtlichen Kurzinfos 
erlautern wir, was das Pro- 
gramm macht. Die Be- 
zeichnungen der Kurzin- 
fos stimmen exakt mit den 
Dateinamen auf der Dis- 
kette iiberein. 
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Interpretationen 



Basic ist eine Dialogspra- 
che. Mit der Tastatur kann 
man den Computer direkt 
ansprechen: Seine Antwort 
erscheint auf dem Bild- 
schirm. Dazu existiert eine 
Reihe von Befehlen, die 
man als direkte Komman- 
dos eingeben kann. Sie wer- 
den unmittelbar nach Tipp 
auf die RETURN-Taste aus- 
gefiihrt: PRINT, LOAD, 
SAVE, OPEN, CLOSE, 
VERIFY, RUN, LIST, NEW 
usw). Im Programmodus 
arbeitet der Computer An- 
weisungen ab, die im dafur 
vorgesehenen Speicher 
(Basic-RAM) stehen. Befeh- 
le und Anweisungen sind in 
Programmzeilen unterge- 
bracht, die mit einer Zeilen- 
nummer beginnen. Nach 
dem Start mit RUN sortiert 
der Computer die Zeilen in 
aufsteigender Reihenfolge 
und fuhrt die Befehle Schritt 
fur Schritt aus. 

Urn dies zu steuern, be- 
sitzt der C64 ein umfangrei- 
ches Programm in Maschi- 
nensprache (etwas anderes 
versteht er nicht!), den 
Basic-Interpreter. Er liegt 
im ROM-Bereich von Adres- 
se 40960 bis Speicherstelle 
49151 . Dieses 8 KByte grofte 
Assembler-Programm un- 
tersucht Ihre Basic-Einga- 
ben und uberpruft sie an- 
hand einer Tabelle im Be- 
reich von 41118 bis 41372 
(Abb. 1) auf die richtige 



Schreibweise (Syntax). Vor 
allem Anfanger kennen den 
Effekt: Wenn etwas nicht 
stimmt, erscheinen die be- 
ruhmten Fehlermeldungen 
(Abb. 2). Die entsprechen- 
den Texte befinden sich un- 
mittelbar hinter den Befehls- 
wortern: von Adresse 41374 
bis 41757. Gab's nichts aus- 
zusetzen, wandelt der Inter- 
preter die Befehle in ihre 
Kurzform urn: Tokens. Sie 
umfassen lediglich 1 Byte 
mit Werten zwischen 128 
und 203. In einer Tabelle 
(von 40972 bis 41087) ist er- 
faBt, ab welchen Adressen 
die verschiedenen Maschi- 
nenroutinen liegen, die fur 
die Ausfijhrung der Basic- 
Anweisung verantwortlich 
sind (Tabelle 1). Nach geta- 
ner Arbeit kehrt der Basic- 



Interpreter wieder in die 
Hauptschleife zuruck und 
wartet auf neue Arbeit. 

Zwei Basic-Programme 
auf der Diskette zu diesem 
Sonderheft lesen die Text- 
Bytes des Basic-Interpreters 
und geben sie auf dem Bild- 
schirm aus: basic-befehle 
und fehlermeldungen. Man 
ladt sie wie jedes Basic-Pro- 
gramm und startet sie mit 
RUN. Der Bildschirm bringt 
die Befehlsworter bzw. die 
Basic-Fehlermeldungen for- 
matiert. Eines fallt auf: Der 
letzte Buchstabe ist stets 
groB (Versal). Damit weiR der 
Basic-Interpreter, daB das 
Befehlswort zu Ende ist. 

Der letzte, zusammen- 
hangende Textbereich des 
Basic-Interpreters ist die 
Einschaltmeldung. Sie be- 
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[1] Diese Befehle kennt der Basic-Interpreter des C64 



file datA 

formula too conpleX 
can't continuE 
undef'd functioN 



too Many fileS 

file opeN 

file not opeN 

file not founD 

device not presenT 

not input filE 

not output filE 

missing file nanE 

illegal device nunbeR 

next without foR 

syntax 

return without gosuB 

out of datA 

illegal quantity 

overflow 

out of memory 

undef'd statenenT 

bad subscripT 

redin'd arraV 

division by zerO 

illegal direcT 

type MisMatcH 

string too lonG 



[2] Hinweise fur Programmierer: die Fehlermeldungen 



Tabelle 1. Tokens und Betriebssystemadressen der Basic-Befehle 



Anweisung/Befehl 


Adresse hex./dez. 


Token hex./dez. 




END 


A831 (43057) 


80 (128) 




FOR 


A742 (42818) 


81 (129) 




NEXT 


AD1E (44318) 


82 (130) 




DATA 


A8F8 (43256) 


83 (131) 




INPUT* 


ABA5 (43941) 


84 (132) 




INPUT 


ABBF (43967) 


85 (133) 




DIM 


B081 (45185) 


86 (134) 




READ 


AC06 (44038) 


87 (135) 




LET 


A9A5 (43429) 


88 (136) 




GOTO 


A8A0 (43168) 


89 (137) 




RUN 


A871 (43121) 


8A (138) 




IF 


A928 (43304) 


8B (139) 




RESTORE 


A81D (43037) 


8C (140) 




GOSUB 


A883 (43139) 


8D (141) 




RETURN 


A8D2 (43218) 


8E (142) 




REM 


A93B (43323) 


8F (143) 




STOP 


A82F (43055) 


90 (144) 




ON 


A94B (43339) 


91 (145) 




WAIT 


B82D (47149) 


92 (146) 




LOAD 


E168 (57704) 


93 (147) 




SAVE 


E156 (57686) 


94 (148) 




VERIFY 


E165 (57701) 


95 (149) 




DEF 


B3B3 (46003) 


96 (150) 




POKE 


B824 (47140) 


97 (151) 




PRINT* 


AA80 (43648) 


98 (152) 




PRINT 


AAA0 (43680) 


99 (153) 




CONT 


A857 (43095) 


9A (154) 




LIST 


A69C (42652) 


9B (155) 




CLR 


A65E (42590) 


9C (156) 




CMD 


AA86 (43654) 


9D (157) 




SYS 


E12A (57642) 


9E (158) 




OPEN 


E1BE (57790) 


9F (159) 




CLOSE 


E1C7 (57799) 


A0 (160) 




GET 


AB7B (43899) 


A1 (161) 




NEW 


A642 (42562) 


A2 (162) 




SGN 


BC39 (48185) 


B4 (180) 




INT 


BCCC (48332) 


B5 (181) 




ABS 


BC58 (48216) 


B6 (182) 




USR 


0310 (784) 


B7 (183) 




FRE 


B37D (45949) 


B8 (184) 




POS 


B39E (45982) 


B9 (185) 




SQR 


BF71 (49009) 


BA (186) 




RND 


E097 (57495) 


BB (187) 




LOG 


B9EA (47594) 


BC (188) 




EXP 


BFED (49133) 


BD (189) 




COS 


E264 (57956) 


BE (190) 




SIN 


E26B (57963) 


BF(191) 




TAN 


E2B4 (58036) 


CO (192) 




ATN 


E30E (58126) 


C1 (193) 




PEEK 


B80D (47117) 


C2 (194) 




LEN 


B77C (46972) 


C3 (195) 




STR$ 


B465 (46181) 


C4 (196) 




VAL 


B7AD (47021) 


C5 (197) 




ASC 


B78B (46987) 


C6 (198) 




CHR$ 


B6EC (46828) 


C7 (199) 





LEFTS 


B700 (46848) 


C8 (200) 


RIGHTS 


B72C (46892) 


C9 (201) 


MID$ 


B737 (46903) 


CA (202) 


Basic-Operatoren 


OR 


AFE6 (45030) 


46 (70) 


AND 


AFE9 (45033) 


50 (80) 


NOT 


AED4 (44756) 


5A (70) 


= 


B016 (45078) 


64 (100) 


+ 


B86A (47210) 


79 (121) 


- 


B853 (47187) 


79 (121) 


• 


BA2B (47659) 


7B (123) 


/ 


BB12 (47890) 


7B (123) 




BF7B (49019) 


7F (127) 



Kurzinfo: basic-befehle 



Nach dem Start mit RUN gibt der Bildschirm eine in vier Spalten for- 
matierte Liste aller Befehlsworter des Basic 2.0 aus. 

Zeile 9: Vorbesetzung der Variablen, Bildschirm loschen und Klein- 
schrift einschalten (wird durch ein reverses N = CHR$(14) erzeugt). 
Z ist die Zahlvariable fur die aktuelle Bildschirmzeile, X und TB kum- 
mern sich um die aktuelle Spalte: Zu Beginn gilt der Wert 2. 

Zeile 10: In einer FOR-NEXT-Schleife liest der Computer die Spei- 
cherinhalte der ROM-Adressen im Basic-Interpreter von 41118 bis 
41372 und speichert den jeweiligen Wert (CHR$) in der Variablen A$. 

Zeilen 11 bis 21: Manche Codes, vor allem Rechen- und Vergleichs- 
operatoren, sind im Interpreter-ROM mit einem um »128« ($80) hohe- 
ren Wert ausgestattet. Die IF-THEN-Abfragen dieser Basic-Zeilen an- 
dern die Codes fur eine korrekte Bildschirmausgabe. 

Zeile 28: Diese Abfrage iiberpruft, ob Z bereits den Wert 23 ange- 
nommen hat. Falls ja, setztdas Programm Zwiederauf 0, erhoht aber 
X um einen Zahler. X wird mit 10 multipliziert und das Rechenergebnis 
an TB weitergegeben: Das ist die jetzt aktuelle Cursorspalte fur die 
Bildschirmausgabe. Diefolgenden POKE- und SYS-Anweisungen ge- 
ben die Werte an den Computer weiter: Adresse 214 = Zeile, 211 = 
Spalte. 

Zeile 29: Hier macht sich das Programm zunutze, daS jedes Basic- 
Befehlswort als Endekennzeichen einen GroSbuchstaben besitzt. 
Solche Zeichen besitzen immer einen Wert, der groSer als »127« ist. 
Trifft diese Bedingung zu, wird an den GroSbuchstaben noch ein 
< RETURN > (CHR$(13)) angefiigt, damit das nachste Wort in der 
nachsten Zeile steht. Dadurch erhoht sich auch der Zeilenzahler Z um 
»1«. 

Zeile 39: Der aktuelle Inhalt von A$ wird an der momentanen Spal- 
tenposition (TB) ausgegeben. Das an die Variable angefugte Semiko- 
lon sorgt dafiir, das die aus dem ROM-Speicher gelesenen Zeichen 
hintereinander auf dem Bildschirm erscheinen (und nicht untereinan- 
der!). 

Zeile 40: NEXT erhoht die Schleifenvariable I um »1« und laBt den 
Computer zu Zeile 10 zuriickkehren. Das Spiel beginnt von neuem, 
bis die Speicherstelle 41372 erreicht ist. 

Zeile 50: Wenn die FOR-NEXT-Schleife beendet ist, wird der 
Programm-Anwender aufgefordert, eine Taste zu drucken. Dazu 
kennt Basic 2.0 einen oft benutzen Basic-Ausruck: POKE 198,0: WAIT 
198,1. Adresse 198 gehort zum Tastaturpuffer des C64 und speichert 
die Anzahl der gedruckten Tasten. Da diese Speicherstelle den Ta- 
stenanschlag aber erst erwartet, muS der Inhalt geloscht werden (0): 
Der Computer befindet sich in einer Warteschleife, bis WAIT die Be- 
dingung 1 vorfindet: Taste gedriickt!. Jetzt arbeitet der Computer den 
nachsten Befehl ab, also END. 



Kurzinfo: fehlermeldungen 



Dieses Programm halt sich ans Prinzip von »basic-befehle«: 

Zeile 9: Bildschirm loschen, Kleinschrift aktivieren und Variablen 
vorbesetzen. TB erhalt hier dem Wert 1 (zweite Spalte!). 

Zeile 10: Die Schleife beriicksichtigt nun die ROM-Adressen 41374 
bis 41757: Hier hat der Basic-Interpreter die Texte zu den Fehlermel- 
dungen abgelegt. 

Zeile 28: ist identisch mit der Zeile in »basic-befehle«. Lediglich X 
wird hiier mit 20 multipliziert, um einen groBeren Spaltenabstand bei 
der Bildschirmausgabe zu erhalten. 

Zeilen 29 bis 50: identisch mit »basic-befehle«. 
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findet sich allerdings nicht 
mehr im Basic-ROM, son- 
dern ist im Betriebssystem 
(Kernel) untergebracht: von 
Adresse 58402 bis 58539. 

Befehle und Funlc- 
tionen 



Man teilt die Basic- 
Befehlsworter in Gruppen 
ein: 

Kommandos: Sie gelten 
sowohl im Direkt- als auch 
im Programmodus (Bei- 
spiel: LOAD, SAVE). 

Anweisungen: fuhrt der 
Computer nur dann aus, 
wenn sie in einer Programm- 
zeile definiert sind. Andem- 
falls erscheint die Fehler- 
meldung: Illegal direct (Bei- 
spiel: INPUT). 

Funktionen: bezeichnen 
einen Wert, der durch die Art 
der Funktion und des Argu- 
ments (in Klammern) defi- 
niert ist (z.B. Quadratwurzel: 
SQR(49) = 7, FRE(O) usw.). 

Operatoren: sind Re- 



chenzeichen, die eine Be- 
ziehung zwischen Zahlen 
herstellen (z.B. +, -, / und *) 
Oder zum Vergleich dienen 
(z.B. =,<,>,<>). 

Sonder- und Grafikzei- 
chen: In Verbindung mit Va- 
riablennamen ordnen be- 
stimmte Zeichen die Varia- 
blenwerte deren Bedeutung 
zu: <$> registriert Zei- 
chenketten (String-Varia- 
blen). < % > kann nur hinter 
numerischen Variablen ste- 
hen und legt test, daB es sich 
urn eine Integer- Variable oh- 
ne Nachkommastellen han- 
delt (Beispiele: A$, A°/o). An- 
dere Sonderzeichen fungie- 
ren lediglich als Satzanwei- 
sung (z.B. !, ?). <;> unter- 
druckt bei der PRINT-Aus- 
gabe Leerzeilen und fugt die 
nachste Ausgabe direkt da- 
hinter. <,> kann zwischen 
mehreren Variablen stehen, 
die der Computer der Reihe 
nach ubemimmt(z.B. bei IN- 
PUT, READ, PRINT usw.). 
Unsere Tabelle 2 zeigt alle 
Befehlsworter des Basic 2.0 
mit Erlauterung. 



Tabelle 2. Die Befehle des Basic 2.0 



Bezeichnung 



Infos zur Bedienung 



ASC('X') 

CHRS(X) 

CLOSE 
CLR 



CMD 



verwandelt ein Zeichen (oder das erste einer Zeichen- 

kette) in den ASCII-Codewert. 

Beispiel: PRINT ASC(" A") ergibt »65«. 

wandelt die ASCII-Codezahl X (0 bis 255) in das entspre- 

chende Zeichen urn. Die Zuordnung der ASCII-Codes zu 

den betreffenden Zeichen finden Sie im Handbuch des 

C64. 

Beispiel: PRINT CHR$(65) bringt ein »A«. 

schlieBt eine mit OPEN gebffnete Datei. Dazugenugt die 

Angabe der Dateinummer. Jede Datei muB unbedingt 

durch dieseAnweisunggeschlossen werden, sonstfehlt 

die Endmarkierung hinter dem letzten Datensatz. Das 

bringt Datenverlust. Nicht geschlossene Dateien er- 

kennt man im Directory einer Diskette am »*«. 

loscht alle Variablen und Array-Dimensionen: Numeri- 

sche Variablen werden auf »0« gesetzt, String-Variable 

bekommen den Wert " " (leer) zugewiesen. Bei READ- 

DATA-Befehlen wird wie bei RESTORE der Zeiger auf die 

erste DATA-Zeile gelenkt. Das Programm im Speicher 

undderZustand gebffneter Dateien bleiben davon unbe- 

ruhrt. 

ist die Abkurzung von "Change Main Device« und be- 

wirkt, daB die folgende Dateniibertragung auf die beim 

OPEN-Befehl angegebene Geratenummer umgeleitet 

wird. CMD muB dieselbe Dateinummer wie OPEN besit- 

zen. Alle weiteren Ausgaben (z.B. PRINT, LIST usw.) 

werden jetzt zum eingestellten Gerat geleitet. 

Beispiel: Ausgabe eines Basic-Listings auf dem Drucker 

OPEN 4,4,0 

CMD 4 

LIST 

CMD laBt sich auch mit einem Kommentar versehen, 
der dann ebenfalls mitgedruckt wird, z.B.: 
CMD 4,"MEIN ERSTES LISTING" 

Die Umstellung durch CMD wird mit PRINT* Datei- 
nummer Oder < RUN/STOP RESTORE > wieder ruck- 
gangig gemacht. 



CONT 



DATA 



DEFFN 



DIM 



END 



FOR-TO 
NEXT 



STEP- 



GET 



GET* 



GOSUB-RETURN 




setzt ein mit STOP abgebrochenes Programm wieder in 
Gang: Alle Variablenwerte bleiben erhalten. Vorausset- 
zung: Nach STOP durften keine Programmanderungen 
gemacht werden (z.B neue Basic-Zeilen dazuschreiben 
Oder bestehende verbessern!). Dann erscheint die Feh- 
lermeldung: »can't continue error«. 
Damit kann man beliebig viele Zahlen und Strings in ei- 
nem Programm fest speichern (nur begrenzt durch den 
Speicherplatz des Computers). Sie stehen in Programm- 
zeilen hinter dem DATA-Befehl, getrennt durch Kommas. 
Strings miissen nicht in Anfiihrungszeichen stehen, au- 
Ber, sie enthalten Komma, Strichpunkt Oder Grafikzei- 
chen, die mit den Tasten <SHIFT> und <CBM> er- 
zeugt werden. 

Syntax-Vorschrift: DEF FN Name(Variable) = Formel. 
Komplizierte numerische Formeln lassen sich damit in 
Kurzform definieren. Der Name dieser Funktion beginnt 
jetzt mit FN. Der jeweilige Wert der numerischen Varia- 
blen in Klammern wird uberall in der Formel eingesetzt, 
wo das Programm diese Variable findet. DEF FN darf man 
nicht im Direktmodus anwenden. Stringvariable sind nicht 
erlaubt. 

Beispiel: Die Adresse 49152 soil in High- und Lowbyte 
zerlegt werden. 

10 DEF FN H(X) = INT(X/256) 
20 DEF FN L(X) = X-INT(X/256)*256 
30 AD = 49152 

40 PRINT FN L(AD), FN H(AD) 
Ausgabe: (Lowbyte) 192 (Highbyte) 
reserviert einen Speicherbereich fur eine per Index fest- 
gelegte Anzahl von Variablen desselben Namens: Der 
Unterschied besteht lediglich in der jeweiligen Indexnum- 
mer. Diesen Variablenspeicher nennt man Feld Oder Ar- 
ray. Mit DIM lassen sich numerische und Stringvariablen- 
felder vorbereiten. Aber: ein Feld kann immer nur einen 
einzigen Variablentyp enthalten. Sie kbnnen mehrere 
Felder hinter DIM reservieren lassen: Die Variablenna- 
men miissen durch Kommas getrennt sein. Felder kbn- 
nen mehrere Dimensionen besitzen. Bei mehrdimensio- 
nalen Arrays werden pro Index 1 1 Byte im Basic-RAM re- 
serviert: Vorsicht bei zu hohen DIM-Werten! 
Dieser Befehl kann fur sich allein stehen oder nach einer 
IF-THEN-Anweisung als Aktion. Das Programm wird so- 
fort beendet. Es erscheint die READY-Meldung und der 
blinkende Cursor. 

Hinter FOR steht die Schleifenvariable mit derZuweisung 
des Anfangswerts, hinter TO der Endwert. Mit STEP laBt 
sich die Schrittweite einstellen. Sie kann auch negativ 
oder ein Dezimalbruch sein. Schleifen, die ruckwarts zah- 
len, brauchen immer eine negative STEP-Anweisung: 
FOR I = 10 TO STEP -2. Mehrere Schleifen lassen sich 
verschachteln. Die innere Schleife muB aber immer vor 
der auBeren abgearbeitet werden. Bei NEXT diirfen Sie 
die Angabe der Schleifenvariablen (z.B. NEXT A) weglas- 
sen, wenn dadurch keine Verwechslungen mit anderen 
Schleifen entstehen kbnnen. Folgen bei Schachtelschlei- 
fen mehrere NEXT-Befehle hintereinander, kann man 
hinter einer einzigen NEXT-Anweisung alle Schleifenva- 
riablen angeben (durch Kommas getrennt!). Beispiel: 
NEXT A,B,C. Hier muB man ebenfalls die Reihenfolge 
»innen vor auBen« einhalten! 

holt eine-Zahl oder ein Zeichen aus dem Tastaturpuffer 
und weist es der Variablen zu, die hinter GET steht. Bei 
fehlerhaftem Variablentyp bricht das Programm mit einer 
Fehlermeldung ab. GET ist ungeduldig und wartet nicht. 
Ist der Puffer leer, weist er der Variablen den Wert »f> oder 
einen Leerstring zu. Daher laBt er sich nur in einer GOTO- 
Schleife verwenden. Beispiel: 
10 GET A$: IF A$="" THEN 10 
Im Gegensatz zu INPUTsind bei GETalle Zeichen erlaubt 
- falls es auf einen String wartet. 
Wie der normale GET-Befehl liest GET* einzelne Zei- 
chen aus einer mit OPEN gebffneten Datei. Im Gegensatz 
zu INPUT* kann die Anzahl der Zeichen beliebig ge- 
wahlt werden. GET* braucht dieselbe Dateinummer wie 
OPEN und laBt sich nicht im Direktmodus verwenden. 
springt zu einem Unterprogramm, das mit der hinter GO- 
SUB angegebenen Zeilennummer beginnt. Dann kehrt 
der Computer zur nachsten Anweisung zuruck, die direkt 
hinter dem GOSUB-Aufruf steht. Unterprogramme las- 
sen sich schachteln und kbnnen sich selbst aufrufen - al- 
lerdings hbchstens 25mal. Grund: zuwenig Platz im Sta- 
pelspeicher, der Unterprogrammaufrufe registriert. Trifft 
ein Programm ohne vorheriges GOSUB auf eine 
RETURN-Anweisung, bricht es mit der entsprechenden 
Fehlermeldung ab: »return without gosub«. 
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GOTO 



IF - THEN 



INPUT 



INPUT* 



INT(A) 



LEFT$(X$,A) 



LEN("string") 



LET 



LIST 



MID$(X$,B,A) 



NEW 



veranlaBt den Computer, sowohl im Direkt- als auch im 
Programmodus auf die hinter dem Befehlswort angege- 
bene Zeilennummer zu springen, z.B. GOTO 1000. Es 
durfen hbhere Oder niedigere Zeilennummem sein, durch 
Riickspriinge lassen sich Programmschleifen erzeugen. 
Fehlt die hinter GOTO eingetragene Zeilennummer, 
bricht das Programm mit der Fehlermeldung »undef'd 
statement error« ab. 

Nach IF folgt eine Priifbedingung, nach THEN die Aktions- 
anweisung. 1st die Bedingung erfullt, werden die restli- 
chen Befehle in der Basic-Zeile ausgefuhrt, sonst macht 
das Programm bei der nachsten Zeile weiter. Mehrere IF- 
THEN-Befehle bilden, hintereinandergestellt, eine Mehr- 
fachpriifung. Steht hinter THEN ein GOTO, konnen Sie 
einen der beiden Befehle weglassen. Beispiele: IF A = 1 
THEN 100 bzw. IFA = 1 GOTO 100. 
funktioniert nicht im Direktmodus und darf nur in einem 
Basic-Programm eingesetzt werden. StbBt der Interpreter 
auf eine INPUT-Anweisung, gibt er ein Fragezeichen aus. 
Der Computer erwartet eine Eingabe von der Tastatur, die 
man mit < RETURN > abschlieBen muB. Je nach Varia- 
blentyp hinter INPUT (getrennt durch ein Semikolon), dur- 
fen Sie Stringtexte Oder beliebige Zahlen, auch mit Nach- 
kommastellen, eingeben. Bei Strings kann Ihre Eingabe 
78 Zeichen nicht uberschreiten. Die Zeichen < , > und 
< : > sind nicht erlaubt. Stimmen Eingabe- und Variablen- 
typ nicht uberein, weist sie der INPUT-Befehl mit einer 
entsprechenden Meldung zuriick. Per INPUT lassen sich 
mehrere Variablentypen hintereinander abfragen. Sie 
mussen durch ein Komma getrennt sein. Es ist mbglich, 
vor die Abfrage per PRINT Oder bei INPUT selbst einen 
Hinweiskommentar-String zu setzen, z.B.: 
INPUT "K0MMENTAR";A$ 

Achten Sie darauf , daB der Kommentar-String nicht lan- 
ger als 38 Zeichen istl 

liest Daten einer Datei, die mit OPEN geoffnet wurde. 
INPUT* verlangt die Angabe derselben Dateinummer 
(wie OPEN). Diese Anweisung laBt sich nur im Program m- 
modus anwenden. Es werden ganze Datengruppen in 
den Computer geholt (im Gegensatz zu GET* , das nur 
Zeichen fiir Zeichen liest) - allerdings darf kein String lan- 
ger als 80 Zeichen sein. Hinter INPUT * konnen mehrere, 
durch Kommas getrennte Variable stehen, z.B. 
INPUT#2,A,B$,C,D. 

wandelt den Dezimalbruch A in eine ganze Zahl (Integer) 
urn. A kann nicht nur ein Dezimalbruch, sondern auch ei- 
ne mathematische Formel bzw. ein komplizierter Rechen- 
ausdruck sein. Achtung: Lassen Sie nie die Klammern 
weg. Ein Beispiel: Die Formel 
A = INT(RND(0)*X)+Y 

erzeugt ganze Zahlen innerhalb des Zahlenbereichs Y bis 
Y + X-1. 

schneidet vom String X$, ganz links beim ersten Zeichen 
beginnend, A Zeichen ab und bildet daraus einen neuen 
String. Beispiel: 
X$ = "COMPUTER" 
PRINT LEFT$(X$,3) 
Ausgabe: COM 

gibt die gesamte Lange eines Strings inklusive Leer- und 
Steuerzeichen als Zahl aus. In der Klammer darf ein 
String als Zeichenkette in Anfuhrungszeichen Oder als 
Variable stehen, z.b. LEN(X$). 

weist einer Variablen einen Wert zu: LET A = 10. Beim 
Basic 2.0 des C64 konnen Sie LET problemlos weglas- 
sen, die Anweisung »A = 10« bewirkt dasselbe. 
gibt den Inhalt des Basic-Programmspeichers auf dem 
Bildschirm aus. Durch Eingabe der Zeilenummer Oder ei- 
nes solchen Bereichs konnen Programmteile auf den Mo- 
nitor gebracht werden, z.B. LIST 10, LIST 1 00 - 300 usw.. 
Der Befehl LIST loscht kein Basic-Programm! 
extrahiert aus dem String X$, von links beginnend, ab 
dem Zeichen mit der Nummer B insgesamt A Zeichen. 
Beispiel: 

X$ = "INTERFACE" 
PRINT MID$ (X$, 5,3) 
Ausgabe: RFA 

Wenn man die zweite Zahl A weglaBt, z.B. MID$(X$,5), 
wirkt dieser Befehl wie RIGHT$(X$,A). 
macht den Programmspeicher frei zur Eingabe eines 
neuen Basic-Programms. Genauer: Es loscht die »Zeilen- 
Linker- (Adressen 2049/2050), die auf den Beginn der 
nachsten Programmzeile weisen und setzt die Zeiger fiirs 
Ende des Basic-Programms zuriick. Ab Adresse 2051 be- 
findet sich Ihr altes Basic-Programm unversehrt im Spei- 
cher. Es laBt sich aber mit Tricks wieder zuruckholen. 



ON GOSUB/ON 
GOTO 



OPEN 



PEEK 



POKE 



POS(0) 



PRINT 



PRINT* 



READ 



REM 



RESTORE 



RIGHT$(X$,A) 



RND(X) 
RUN 



Syntax-Vorschrift: ON Variable GOSUB/GOTO Zeile A, 
Zeile B, Zeile C usw. Ganzzahlige Variablenwerte legen 
fest, wohin das Programm springen soil: ON beginnt im- 
mer bei »1«zu zahlen: 1 entspricht Zeilennummer A, 2 da- 
gegen Zeilennummer B usw. Bei kleineren Oder groBeren 
Variablenwerten springt ON-GOSUB/ON-GOTO zur 
nachsten Basic-Zeile, ohne irgendein Unterprogramm 
aufzurufen. Haben Sie sich fiir ON-GOSUB entschieden, 
muB das aufgerufene Unterprogramm mit einer 
RETURN-Anweisung enden. 

bffnet eine Datei zum Schreiben Oder Lesen. Hinter OPEN 
stehen bis zu sechs weitere Angaben, die man durch 
Kommas voneinandertrennen muB: OPEN Dateinummer, 
Geratenummer, Sekundaradresse, " Dateiname, Typ, Mo- 
dus". 

Syntax-Vorschrift: PRINT PEEK(Adresse). »Adresse« muB 
immer in Klammern stehen: Die Anweisung liest den In- 
halt dieser Speicherstelle. Erlaubt sind Zahlen zwischen 
und 65535 (sonst erscheint ein -illegal quantity error*). 
Syntax-Vorschrift: POKE Adresse, Wert. Adresse und 
Wert miissen durch ein Komma getrennt sein. »Wert« wird 
in »Adresse« eingetragen. Der alte Inhalt von »Adresse« 
wird dabei iiberschrieben. Erlaubte Zahlen fiir »Wert« sind 
bis 255, fiir »Adresse« bis 65535. Bei Uberschreitung 
dieser Zahlen erscheint die Fehlermeldung »illegal quanti- 
ty error-. 

liefert die aktuelle Cursor-Position innerhalb einer logi- 
schen Bildschirmzeile. Dadurch konnen nur Werte zwi- 
schen und 79 erscheinen. POS zeigt immer die Cur- 
sor-Position hinter dem zuletzt ausgegebenen Zeichen: 
PRINTTAB(IO) "HALLO"; :PRINT P0S(0) 
Ausgabe: HALLO 15 

Das Wort »Hallo« wurde ab der 10. Bildschirmspalte 
ausgegeben, fiinf Zeichen (1 5) dahinter befindet sich jetzt 
der Cursor. In den Klammern hinter POS muB lediglich ein 
Dummy-Argument stehen, z.B. »0«. 
Der Computer gibt alles, was dahinter als Zeichenkette in 
Anfuhrungszeichen, String- Oder numerische Variable 
steht, auf dem Bildschirm aus. Das konnen auch Ergeb- 
nisse von Rechenanweisungen sein (z.B. PRINT 45 « 5, 
PRINT 49/7, PRINT 56 + 31 usw.). Mehrere Wbrter Oder 
Zahlenwerte lassen sich mit einem einzigen PRINT- 
Befehl ausgeben. Nur: Sie miissen durch ein Semikolon 
Oder Komma voneinander getrennt sein. Der Strichpunkt 
erzeugt einen Abstand von zwei Leerzeichen, das Kom- 
ma verschiebt die Ausgabe aufs nachste Bildschirmvier- 
tel. Zahlen Oder Buchstaben, die ohne Anfiihrungsstriche 
hinter PRINT stehen, werden immer als Variablen inter- 
pretiert. Alle Symbole der Tastatur, auch die Grafikzei- 
chen, durfen zur Bildung einer Zeichenkette (String) ver- 
wendet werden. 

sendet Daten zur Floppystation Oder zum Drucker. Pro 
PRINT* -Anweisung lassen sich maximal 255 Zeichen 
abschicken. PRINT* verlangt die gleiche Dateinummer 
wie OPEN. Es lassen sich numerische Oder Stringvaria- 
ble (auch DIM-Arrays) iibertragen. Wichtig: Die einzelnen 
Variableninhalte miissen durch ein -Carriage Return- 
(CHR$(13) voneinander getrennt sein. 
ist untrennbar mit der DATA-Anweisung verbunden: 
READ liest der Reihe nach die Daten aus den Basic- 
Zeilen, die mit DATA beginnen, und legt sie im Variablen- 
speicher ab. Datentyp bei DATA und Variablentyp bei 
READ miissen unbeingt iibereinstimmen. 
Damit kann man Kommentartexte in einer Basic-Zeile un- 
terbringen. Eine REM-Zeile beeinfluBt den Programm- 
ablauf nicht. Lediglich bei der Ausgabe mit LIST auf Bild- 
schirm Oder Drucker geben die Texte in REM-Zeilen auf- 
schluBreiche Hinweise zur Programmfunktion. 
hat nur Sinn in Verbindung mit READ und DATA. Falls die 
selben DAT As vom Programm nochmals gelesen werden 
sollen, muB man mit RESTORE den Zeiger fiir READ wie- 
der auf die erste DATA-Zeile zuriicksetzen. 
schneidet vom String X$, ganz rechts beim letzten Zei- 
chen beginnend, A Zeichen ab und bildet einen neuen 
String. Beispiel: 
X$ = "BARGELD" 
PRINT RIGHTS (X$, 4) 
Ausgabe: GELD 

setzt man fiir X die Zahl »0« Oder irgendeinen positiven 
Wert ein, erzeugt dieser Befehl eine neunstellige Nach- 
kommazahl zwischen und 1. Sie ist quasi zufallig. 
startet ein Basic-Programm im Speicher. Der Befehl darf 
beliebig oft wiederholt werden. Er loscht kein Programm. 
Folgt auf RUN eine Zeilennummer, beginnt der Pro- 
grammablauf erst an dieser Stelle. 



8 



64'er SONDERHEFT 69 




SPC(X) 



STOP 



STR$(X) 



SYS 



TAB(X) 



Tl, Tl$ 



USR(X) 

VAL(AS) 



WAIT 



verarbeitet in den Klammern eine Zahl von bis 255. Man 
verwendet diese Anweisung in Verbindung mit dem 
PRINT-Befehl. Die Zahl Oder der String, der mit PRINTauf 
den Bildschirm gebracht werden soil, erscheint exakt 
nach den mit SPC(X) definierten Leerstellen, gerechnet 
ab der aktuellen Cursor-Position. Davorstehende Zeichen 
werden nicht geloscht. Beispiel: PRINT SPC(80) "TEST" 
schreibt das Wort TEST zwei Zeilen (2 x 40) tiefer auf den 
Bildschirm. 

bricht ein laufendes Programm ab. Im Unterschied zum 
END-Befehl meldet sich der Computer mit "break in (Zei- 
lennummer)". 

bildet aus dem Wert der Zahl X eine Zeichenkette, die man 
dann allerdings nicht mehr zu Rechenoperationen ver- 
wenden kann. Die Leerstelle furs Vorzeichen wird beibe- 
halten. 

Syntax-Vorschritt: SYS Adresse. Die Anweisung startet 
ein Maschinenprogramm, das bei »Adresse« beginnt. 
Sind Parameter furs X-, Y-, P-Register Oder den Akkumu- 
lator erforderlich, lassen sich die entsprechenden Werte 
in die Speicherzellen 780 bis 783 eintragen. 
wirkt, wie SPC(X), nur in Verbindung mit dem PRINT- 
Befehl: Die Ausgabe eines gewiinschten Strings Oder ei- 
ner Zahl geschieht exakt an der durch X festgelegten Posi- 
tion. X kann Werte zwischen und 255 annehmen. 
sind Variablennamen, die das Betriebssystem zur Ausga- 
be und Einstellung der internen Uhr verwendet. Tl gibt 
den aktuellen Stand des Uhrzahlers in Zehntelsekunden 
aus, Tl$ wandelt diesen Wert in eine verstandliche Anzei- 
ge urn: Stunden, Minuten und Sekunden. AuBerdem lafit 
sich durch eine neue Definition der sechsstelligen Zei- 
chenkette Tl$ die interne Uhr nach Wunsch einstellen. 
Beispiel: Tl$ = "103045" setzt die C-64-Uhr auf 10 Uhr 
30 und 45 Sekunden. 

arbeitet wie SYS (Aufruf einer Maschinenspracheroutine 
aus einem Basic-Programm). Man kann diesem Befehl ei- 
nen numerischen Ausdruck als Argument mitgeben. 
liefert den numerischen Wert von A$. Der String darf als 
Zeichenkette (dann in Anfiihrungszeichen) Oder als Varia- 
ble erscheinen. Die VAL-Funktion sucht den String A$ Zei- 
chen fiir Zeichen nach einer Zahl ab. Beim ersten Zei- 
chen, das keine Zahl mehr ist, wird abgebrochen. Falls der 
String zu Beginn iiberhaupt keine Zahl enthalt, gibt VAL 
den Wert »0» aus. 

Syntax-Vorschrift: WAIT Adresse,N1,N2. Dieser Befehl 
unterbricht ein Programm so lange, bis sich der Inhalt der 
»Adresse« von »0« unterscheidet. Diese Anderung wird 
durch die beiden numerischen Variablen N1 und N2 er- 
zeugt: N2 verkniipft der Basic-Interpreter mit der Boo- 
le'schen Funktion EXOR, das Ergebnis anschlieftend per 
AND mit N1. Das Programm bleibt so lange unterbrochen, 
wie das Gesamtergebnis der beiden Verknupfungen an- 
ders als »0« ist: Sonst macht das Programm mit dem nach- 
sten Befehl weiter. 



Veranderliche 
Werte: Variablen 



Kein Basic-Programmierer 
kommt ohne sie aus: Varia- 
blen, die aus reinen Zei- 
chenketten Oder Zahlenwer- 
ten bestehen konnen. Sie 
lassen sich sowohl im Di- 
rektmodus als auch im Pro- 
gramm definieren. Es sind 
symbolische Platzhalter mit 
charakteristischem Namen. 
Gegenuber anderen Basic- 
Versionen besitzt das Basic 
2.0 des C64 zwei gravieren- 
de Nachteile: Auch, wenn 
sie langere Variablennamen 
eintippen (das ist ohne wei- 
teres moglich), akzeptiert 
der Basic-Interpreter nur die 



ersten beiden Zeichen! Au- 
Berdem darf ein Variablen- 
name pro Typ (String Oder 
numerisch) nur einmal im 
Programm eingesetzt wer- 
den: aufpassen! Es geht 
zwar, z.B. den String C$ und 
die numerische Variable C 
im selben Programm zu de- 
finieren, aber man darf die- 
se Namen nicht mehr an an- 
derer Stelle (z.B. in einem 
Unterprogramm) und mit an- 
deren Werten verwenden: 
Dann produziert das Basic- 
Programm mit Sicherheit 
nur Kauderwelsch. Trotz- 
dem: kein Grund, zu ver- 
zweifeln! Variablennamen 
konnen Kombinationen aus 
zwei Buchstaben sowie ei- 
nes Buchstabens und einer 
Zahl zwischen und 9 bil- 



den. Da gibt's eine Menge 
Moglichkeiten (z.B. AA$, 
B3$, C4$, D9, X1 usw.). Ei- 
nes muB man dabei unbe- 
dingt beachten: Variablen- 
namen diirfen nie mit einer 
Zahl beginnen (falsch ist: 
3A, 6C, 7G$ usw.). 

Variablennamen und de- 
ren Werte bewahrt der Com- 
puter in speziellen Speicher- 
bereichen: unmittelbar hin- 
ter dem Ende des Basic- 
Programms (numerische 
und String-Variablen mit 
den Adressen, wo deren 
Text steht). Der Speicherbe- 
reich fur numerische Varia- 
blen und String-Namen be- 
wegt sich aufwarts, Rich- 
tung Basic-RAM-Ende. Den- 
ken Sie immer daran, wenn 
Sie umfangreiche Basic- 
Programme (uber 120 
Blocks) schreiben und dabei 
viele Variablen verwenden! 
Bei den Urversionen des 
C64 wurden die Texte der im 
Programm angegebenen 
String-Variablen nochmals 
am obersten Ende des 
Basic-RAM angesiedelt und 
bewegten sich in Richtung 
Ende des Basic-Pro- 
gramms. Dort lagen aber die 
numerischen Variablen mit 
dem Trend, sich nach oben 
zu verbreiten. Wenn sich 
beide Variablentypen in der 
Mitte trafen, gab's einen 
»Out of memory Error« (kein 
Speicherplatz mehr frei!). 
Das hat Commodore in neu- 
en C-64-Modellen und im 
C-64-Modus des C128 ab- 
gestellt: Wurden im Basic- 
Programm bereits String- 
Variablen und deren Texte 
definiert, greift der Compu- 
ter exakt auf diese Speicher- 
adressen innerhalb des 



Basic-Programms zu und 
spart damit wertvollen Spei- 
cherplatz. 

Tippen Sie folgende Pro- 
grammzeilen ab: 

10 a=10: b2=20: c9=30 
20 a$= "computer" 
30 b5$= "diskette" 
40 cc$= "monitor" 

Nach dem Start mit RUN 
ergibt sich diese Verteilung 
des Programm- und Varia- 
blenspeichers (Abb. 3): 

Das Basic-Programm 
liegt im Bereich ab Adresse 
2049 ($0801 hexadezimal) 
bis 2126 ($084E). Unmittel- 
bar dahinter (ab 21 27) findet 
man die erste numerische 
Variable, die im Programm 
festgelegt wurde: A (als 
Hexadezimal-Byte 41). Das 
Null-Byte dahinter weist dar- 
auf hin, daB der Name nur 
aus einem Zeichen besteht 
und numerisch ist. Der Va- 
riablenwert (10) ist nicht auf 
Anhieb zu erkennen: Dazu 
benutzt der Computer die 
Methode der FlieBkomma- 
darstellung (hexadezimal 84 
20). Das gilt auch fiir »B2« ab 
Adresse 2134 ($0856): Der 
Variablenname umfaBt jetzt 
zwei Hexadezimal-Byte 
(»42« fur B, »32« fur die Zahl 
2), der FlieBkommawert fiir 
»20« lautet hier »85 20«. Die 
letzte numerische Variable, 
C9, wird als »43 39« darge- 
stellt und bekommt die 
FlieBkommazahl »85 70« zu- 
gewiesen. Ab Speicherstel- 
le 2148 beginnen die String- 
Variablen: »A$« ist mit »41 
80« gekennzeichnet (die He- 
xadezimalzahl »80« ist das 
zweite Variablen-Byte, urn 
den Wert »128« erhoht. Sie 
macht den Basic-Interpreter 
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:0819 


00 


41 


24 


B2 


22 


43 


4F 


40 


i!3AS- r "COM 




:0821 


50 


55 


54 


45 


52 


22 


00 


3B 
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:0829 


08 


IE 


00 


42 


35 


24 


B2 


22 


»!©5a~ T " 




:0831 


44 


49 


53 


4B 


45 


54 


54 


45 


DISKETTE 




:0839 


22 


00 


4D 


08 


28 


00 


43 


43 


" !fKiHj*P,<S3epCC 




:0841 


24 


B2 


22 


4D 


4F 


4E 


49 


54 


S V'MONIT 




:0849 


4F 


52 


22 


00 


00 


00 


41 


00 
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:0851 


84 


20 


00 


00 


00 


42 


32 


85 


m M6&SB21 




:0B59 


20 


00 


00 


00 


43 


39 


85 


70 


MSC91- 




:0861 


00 


00 


00 


41 


80 


08 


IE 


08 


vwiASIIiKJ 




:0869 


00 


00 


42 


B5 


08 


31 


08 


00 


mmi sum 




:0871 


00 


43 


C3 


07 


44 


08 


00 


00 


m msim 





[3] Die Variablen liegen hinter dem Basic-Programm 



64'er SONDERHEFT 69 



Biicher und Software 



MehrRm 



Withoft/Draheim 

64'er- GroBer Einsteiger-Kurs 



Leichtverstandlicher Einfuh- 
rungskurs in die Welt des C64. 
Die Autoren dokumentieren mit 
diesem Buch ihre lehrreichen 
Erfahrungen, Erfolge und auch 
Fehlschlage. So entstand ein 
Buch, das den Computer-Neu- 
ling Schritt fur Schritt durch die 
Welt des C64 fuhrt. Angefangen 
vom Auspacken und Anschlie- 
Ben des C64, uber Basic-Pro- 



grammierung bis zu PEEK- und 
POKE-Befehlen Oder der 
Sprite-Programmierung wird 
das fur den Einsteiger Wissens- 
werte iiber den C64 behandelt. 
Mit alien groBen Beispielpro- 
grammen auf der beiliegenden 
Diskette. 

1988, 236 S., inkl. Diskette 
ISBN 3-89090-668-0, DM 29,90 



M atKt«^* 







Sfr 



VWithof* 



4(urs 







Software zum Buchpreis: 
Profi-Textverarbeitung mit 
komfortabler Druckeranpas- 
sung, Spellchecker, Zeichen- 
satz-Editor und AdreBverwal- 
tung. AuBerdem: individuelle 
Farbgebung, komprimiertes 
Dateiformat, freie Tastenbele- 
gung, Silbentrennung und... 
und ... und ... 
1988, 201 S„ inkl. Diskette 
ISBN 3-89090-527-7, DM 59,- 



MatM: Tectirtk 




Software zum Buchpreis. Profi- 
Datenbank: grafische Benutzer- 
oberflache mit Windows und 
Pull-Down-Menus, flexible 
Dateistruktur, Tastaturmakros, 
beliebig viele Indexfelder, 
Export und Import von Daten, 
integrierte Centronics-Schnitt- 
stelle. 

1988, 155 S., inkl. Diskette 
ISBN 3-89090-583-8, DM 59,- 



MafM TWttA 




Super-Malprogramm zum 
Buchpreis: 4 Grafikbild- 
schirme, 2 Zeichensatze und 
bis zu 64 Sprites; farbige 
3D-Effekte; Grafiken spiegeln, 
verzerren und drehen; Aus- 
druck in beliebiger GrdBe mit 
frei definierbaren Graustufen. 
Zahlreiche Zusatzprogramme. 
1988, 261 S., inkl. 2 Disketten 
ISBN 3-89090-619-2, DM 59,- 



MarWlectriik 




C64/C128-Software zum 
Buchpreis: eines der profes- 
sionellsten 3D-CAD-Pro- 
gramme, das Grafiken von 
starker Raumlictikeit und 
Faszination erstellt. Ermbglicht 
ruckfreie Filme mit bis zu 
24 Bildern pro Sekunde. Die 
Bildkonstruktion erfolgt mit 
dem Joystick. 

1986, 183 S„ inkl. Disketten 
ISBN 3-89090-409-2, DM 49,-* 



kWf Tedirik 




CAD-Programm fur tech- 
nisches Zeichnen, Malen in 
Farbe, Gluckwunschkarten und 
sogar kleine Trickfilme. Mit 
234 Seiten Dokumentation 
und vielen Anwendungs- 
beispielen. AuBerdem ein 
komfortables Drucker- 
anpassungsprogramm. 
1985, 234 S., inkl. Diskette 
ISBN 3-89090-136-0, DM 48- 



Markt Technik 




Software zum Buchpreis. 
Die nutzliche Erganzung fur 
GE0S64undGE0S128: 
Grafikbibliothek, Zeichensatz- 
sammlung, Standardgrafiken 
importieren, Printfox-Zeichen- 
satze einlesen und Drucker- 
anpassungsprogramm. 
1989, 160 S., inkl. 3 Disketten 
ISBN 3-89090-772-5, DM 59,- 



fur den C 64 



fur Fans! 




Die Fortsetzung von Mega 
Pack 1: insgesamt 1 MByte 
auf 3 Disketten mit mehr als 
500 OISKART-Grafiken im 
GeoPaint-Format, 33 GEOS- 
Zeichensatzen und prima Gra- 
fik-, Disk- und Druck-Utilities. 
Die Dateien sind mit alien 
deutschen GEOS-Versionen 
verwendbar. 

1989, 177 S., inkl. 3 Disketten 
ISBN 3-89090-350-9, DM 59,- 
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GEOS-Programmiemng 
mil dem 



HNCKIDUK 



Der ideate Einstieg in die 
Assembler-Programmierung 
unter GEOS. Damit kann jeder 
C64/C128-Benutzer eigene 
GEOS-Anwendungen, Desk- 
Accessories und VUR-Pro- 
gramme schreiben. Mit alien 
Routinen und Systemvariablen 
zum Nachschlagen. 
1990, 432 S., inkl. Diskette 
ISBN 3-89090-247-2, DM 89,- 




Spiele programmieren und 
dabei alles iiber Basic lernen. 
Die im Buch beschriebenen 
21 Spiele sind als Listings 
abgedruckt und werden auf 
der beiliegenden Diskette 
gleich mitgeliefert. 
1989, 209 S., inkl. Diskette 
ISBN 3-89090-701-6, DM 39,- 
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Hp&Hricks 
undlbois 



&*n*Lng»n hj E'Uhbv 



Eine Kombination aus Assem- 
bler-Kurs im Buch und Soft- 
ware auf Diskette: komplettes 
Entwicklungspaket mit 
Makroassembler, Maschinen- 
sprachenmonitor, Reassembler, 
Einzelschrittsimulator. 
Die Entwicklung von eigenen 
Assemblerprogrammen wird 
so zu einer leichten Ubung. 
1988, 314 S., inkl. Diskette 
ISBN 3-89090-571-4, DM 59,- 



Eine Zusammenstellung aller 
Kniffe rund urn den C64 in 
Basic und Maschinensprache. 
Leichtverstandliche Erklarun- 
gen fur Einsteiger und neueste 
Anregungen fur Insider. Mit 
Beispielprogrammen und 
besten Utilities auf Diskette. 
Nach der Lekture sind Sie der 
Profi auf dem C 64. 
1988, 439 S., inkl. Diskette 
ISBN 3-89090-499-8, DM 59,- 
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Hardware- 
Basfeleien 




Anwenderhandbuch fur GEOS 
2.0 (C64/C128). Mit Beschrei- 
bung und Referenz zur gesam- 
ten GEOS-Programmwelt 
sowie vielen Tips &Tricks. 
Mit GEOS-Demo auf Diskette. 
1989, 432 S., inkl. Diskette 
ISBN 3-89090-808-X, DM 59,- 



Eine leichtverstandliche Ein- 
fuhrung in die digitale Schal- 
tungstechnik. Mit Platinenlay- 
outs und Selbstbauanleitungen 
fur Sprachausgabebaustein, 
128-Kbyte-EPROM-Karteu.a. 
Mit Treibersoftware auf 
Diskette. 

1987, 294 S., inkl. Diskette 
ISBN 3-89090-389-4, DM 49,- 




64'er Spielesammlung, Band 1: 

* Balliard * Maze * The 
Way • Schiffeversenken • 
Vager 3 • Firebug • Pirat • 
Handel * Wirtschaftsmanager 

* Bbrse * Vier gewinnt 

* Vier in Vier * Brainstorm 

* Schach * Zauberwiirfel. 
Die Entfuhrung in eine aben- 
teuerliche Spielewelt. 

1987, 115 S., inkl. Diskette 
ISBN 3-89090-429-7, DM 39,-' 
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Spiele- 
sammlung 
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64'er Spielesammlung, Band 3: 

* Arabian Treasurehunt • 
Block'n'Bubble * Robo's 
Revenge * Race of the Bones 

* Quadranoid * Future Race 

* Risiko • Copter Flight • 
Asteroids 64 • Verminator • 
Der kleine Hobbit • Odyssey. 
1988, 103 S., inkl. Diskette 
ISBN 3-89090-596-X, DM 39,- 




64'er Spielesammlung, Band 2: 

* Golf • Billard • Tonti • 
ZauberschloB * Freiheit + 
Steel Slab * Space Invader • 
Apocalypse Now • Block Out 

* Aquator • Todliches Dioxin 

* Libra * Dasher * Bundes- 
liga-Manager. 

Fur alle, die vom Spielen nicht 
genug bekommen. 
1987, 98 S., inkl. Diskette 
ISBN 3-89090-428-9, DM 39,-' 
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64'er Spielesammlung, Band 4: 

* Samurai: Kampfspiel mit 
Spitzengrafik * Omidar: mit 
einem Gorilla auf der Flucht 

• Bomb Runner: Minensuch- 
kommando • Crillion: 
Mischung aus Boulder Dash 
und Arkanoid. 

1988, 80 S., inkl. Diskette 
ISBN 3-89090-703-2, DM 39,-' 

'Unverbindliche Preisempfehlung 



Markt&Technik-Bucher und -Software 
gibt's uberali im Fachhandel und bei Ihrem Buchhandler. 

Fragen Sie auch nach dem neuen Gesamtverzeichnis 
mit iiber 500 aktuellen Computer-Biichern und Software. 




Markt&Technik 

Zeitschriften ■ Bucher 
Software ■ Schulung 




darauf aufmerksam, da(3 es 
sich jetzt urn eine Zeichen- 
ketten-Variable handelt), 
dahinter steht die Lange des 
String-Textes (08) und die 
Adresse in Low-Highby- 
te-Darstellung, ab der er im 
C64 gespeichert ist: $081 E. 
Dies gilt auch fur die restli- 
chen String-Variablen B5$ 
und CC$: Das Wort "Disket- 
te" beginnt bei 2097, "Moni- 
tor" bei 2116. Wenn kunftig 
im Basic-Programm oder Di- 
rektmodus diese Variablen 
aufgerufen werden, holt sie 
sich der C64 aus diesen 
festgelegten Speicherberei- 
chen und bringt ihren Wert 
bzw. Text auf den Bild- 
schirm. 

Man unterscheidet drei 
Variablentypen: 
Real: Das sind numerische 
Variablen. Sie besitzen 
Nachkommastellen, also 
Zahlenbruche hinter dem 
Dezimalpunkt. Man verwen- 
det sie speziell fur Berech- 
nungen. Sie tragen kein 
Sonderzeichen hinter dem 
Variablennamen. 

Integer: betrifft nur ganz- 
zahlige Werte ohne Stellen 
hinter dem Komma. Man 
muB sie mit dem Prozentzei- 
chen <%> ausstatten. Vor- 
teil: Sie bringen eine leicht 
lesbare Zahlendarstellung: 
High- und Low-Byte als He- 
xadezimalzahlen (bei FlieB- 
kommazahlen ist es nicht 
einfach, auf Anhieb deren 
Wert zu erkennenl). Nach- 
teil: Es sind nur Werte zwi- 
schen -32768 bis +32767 
moglich. 

Zeichenketten (Strings): 
diirfen alle Buchstaben, Zif- 
fern, Satz-, Sonder- und 
Grafikzeichen der Tastatur 
enthalten (auBer Anfiih- 
rungsstrichen, die fixieren 
namlich Anfang und Ende 
eines Strings!) und mussen 
nach dem Variablennamen 
ein Dollarzeichen <$> ha- 
ben. 

Real-, Integer- und String- 
Variablen verbrauchen 
exakt den gleichen Spei- 
cherplatz: 7 Byte (zwei fur 
den Namen, f unf fur die Zah- 
lenwerte bzw. die String- 
Ad resse). 
Verbotene Variablen 

Hatten Sie schon »Syntax 
Errors« in offensichtlich kor- 
rekten Basic-Zeilen? Dann 



waren bestimmt die verbote- 
nen Variablen schuld daran! 
Tippen Sie beispielsweise 
folgendes Listing ein: 

10 schiff$= "titanic" 
20 print schiff$ 

Nach RUN erscheint eine 
Fehlermeldung. Bei der 
Syntaxprufung hat der C64 
festgestellt, daB in der Varia- 
blen SCHIFF$ ein Basic- 
Befehlswort enthalten ist: 
IF. Das irritiert den Basic- 
Interpreter, der den Befehl 
in die Abkurzung (Tokens) 
umwandelt - der iibrige Text 
der Basic-Zeile paBt syntak- 
tisch nicht dazu. Die Liste 
solcher Stolpervariablen 
laBt sich beliebig fortfuhren: 
TANNE$ (enthalt TAN), 
LAND$ (AND), ORT$ (OR), 
START$ (ST), TITEL$ und 
TICK$ (Tl). Schade, denn 
auf solche selbsterklaren- 
den Variablennamen muB 
man verzichten und auf we- 
niger markante auswei- 
chen. Wenn Sie jedoch ei- 
nen kleinen, aber urn so ef- 
fektiveren Trick benutzen, 
konnen Sie den Interpreter 
ubers Ohr hauen und ihm 
sogar verbotene Variablen 
unterjubeln: durch Verwen- 
dung des Grafikzeichens 
< SHIFT J> innerhalb des 
Basic-Befehlswortes im Va- 
riablennamen. Das folgen- 
de Programmbeispiel funk- 
tioniert einwandfrei, obwohl 
der Variablenname das 
Basic-Wort AND enthalt (ge- 
ben Sie < shift j> nicht als 
Text, sondern als entspre- 
chendes Tastaturzeichen 
ein): 

10 la < shift j>nd$= 

"italien" 

20 print la < shift j>nd$ 

Die Zeichenfolge, die der 
Basic-Interpreter als Be- 
fehlswort akzeptieren konn- 
te, muB lediglich durch das 
Grafikzeichen getrennt wer- 
den. Wenn Sie so verfahren, 
sollten Sie aber darauf ach- 
ten, daB der entsprechende 
Variablenname mit dem 
Grafikzeichen im gesamten 
Programm gleichlautend 
geschrieben wird! 

Trotz dieses Tricks gilt wei- 
terhin, daB der Computer 
nach erfolgreicher Interpre- 
tation jeden Variablenna- 
men lediglich mit den ersten 



beiden Zeichen speichert. 
Falls Sie langere Variablen- 
bezeichnungen benutzen 
mochten, mussen Sie fol- 
gendes beachten: TASTEN$ 
und TABELLE$ sind fur den 
C64 ein- und dieselbe Varia- 
ble: TA$. 

Variablenfelder 



Fortgeschrittene Program- 
mierer speziell geben sich 
mit einfachen Variablen sel- 
ten ab: Sie bevorzugen die 
indizierten oder Feldvaria- 
blen (Arrays). Egal, wel- 
chem Typ sie angehoren: Ihr 
Name besteht stets aus der 
Variablenbezeichnung und 
mindestens einer Indexziffer 
in Klammern. IhrgroBervbr- 
teil liegt darin, daB nur ein 
Name fur gleichartige Varia- 
blen verwendet werden 
muB. Durch die Indextiefe 
(ein-, zwei-, dreidimensional 
usw.) ergeben sich unter- 
schiedliche Variablenwerte, 
die sich nicht gegenseitig 
uberschneiden oder storen. 
Die Menge und GroBe sol- 
cher Indexfelder ist vor allem 
durch den Speicherplatz be- 
grenzt: Sie mussen namlich 
vorbesetzt werden. 
DIM-Anweisung 

Ohne Dimensionierung 
verkraftet der C64 nur zehn 
Inidizes pro Variable: In den 
meisten Fallen ist das zu we- 
nig. DIM darf nur einmal im 
Programm ausgefiihrt wer- 
den und sollte daher gleich 
zu Programmbeginn oder in 
einer Unterroutine stehen, 
die nach dem Programm- 
start ebenfalls nur einmal 
aufgerufen wird (sonst erhal- 
ten Sie die Fehlermeldung: 
Redim'd Array). Die kleinste 
Indexzahl ist immer »0« (ne- 
gative Zahlen oder Nach- 
kommastellen sind nicht er- 
laubt). Die DIM-Anweisung 
laBt sich im Direkt- und Pro- 
grammodus anwenden und 
setzt zu Beginn alle spezifi- 
schen Feldelemente auf »0«. 
Benutzt man im Programm- 
verlauf groBere Indizes als 
mit DIM eingestellt, er- 
scheint die Fehlermeldung: 
Bad Subscript. Achtung: Ha- 
ben Sie mit DIM kleinere 
Werte als »10« eingestellt, 
wird auch nur die kleinere 
Dimensionierung akzep- 



tiert! Der Freiraum nach 
dem Einschalten (automa- 
tisch zehn Dimensionierun- 
gen) gilt dann nicht mehr. 

Bis zu 255 Felder lassen 
sich mit DIM einstellen. Je- 
des darf maximal 32 767 Ele- 
mente enthalten. Allerdings: 
In der Praxis werden solche 
Monster-DIMs nie vorkom- 
men! 

Was nutzen in Dimensio- 
nen unterteilte Datenfelder? 
Kurz gesagt: Damit lassen 
sich Angaben und Informa- 
tionen zu einem bestimmten 
Objekt spezifizieren. Dazu 
ein Beispiel: 

Sie sind Vorstand eines 
Vereins und mochten fiJnf 
Mitglieder erfassen. Brau- 
chen Sie nur deren Namen, 
geniigen eindimensionale 
Datenfelder, z.B.: 

DIM NN$(5) 
NN$(l)="MAIER Hans" 
NN$(2) = "HUBER Walter" 
NN$(3)= "SCHMIDT Georg" 
NN$ ( 4 ) = "KRAUSE Werner " 
NN$(5)="BERTH0LD Thomas" 

Diese Liste ist recht kum- 
merlich: Wo bleiben die 
Adressen? Wichtig sind 
StraBe, Wohnort und Tele- 
fonnummer. Mit dem Mit- 
gliedsnamen sind das ins- 
gesamt vier Indizes. Legen 
Sie nun ein zweidimensio- 
nales Array an: 

DIM NN$(5,4) 
NN$(1,1) = "MAIER Hans" 
NN$(l,2) = "Baumweg 7" 
NN$( 1,3) = "8000 Miinchen 80" 
NN$( 1,4) ="089/145678" 

Der erste Datensatz »Maier 
Hans« besitzt nun vier Aus- 
sagen uber das Mitglied, es 
wurden aber nur zwei Di- 
mensionen verwendet. Las- 
sen Sie sich von den Zahlen- 
angaben »5,4« nicht verwir- 
ren! 

Uberwiegend zweidimen- 
sionale Datenfelder werden 
von Basic-Programmierern 
verwendet, da man durch 
die entsprechende GroBe 
des zweiten Index zusatzli- 
che Informationen zum 
Hauptbegriff sammeln 

kann. Folgende dreidimen- 
sionale DIM-Anweisung ist 
ebenfalls moglich und er- 
zeugt fur den Anwender den 
sichtbar selben Effekt: DIM 
NN$(5,2,2). Fur welche Art 
Sie sich entscheiden, hangt 
nicht zuletzt davon ab, wie 
und mit welchen Sortierpro- 
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grammen die Daten aufbe- 
reitet werden sollen. Einen 
Nachteil von DIM wollen wir 
nicht verschweigen: Ein di- 
mensioniertes Array, z.B. 
A$(1), verschlingt 17 Byte 
deswertvollen Speicherplat- 
zes im C64! 

Als Demos zur DIM-An- 
weisung finden Sie auf un- 
serer Diskette zum Sonder- 
heft zwei Beispiele: eindim 
und zweidim. 

Eingabesteuerung 

Jeder Basic-Programmierer 
kennt sie, die: 
INPUT-Anweisung 

- ein Komfort des Betriebs- 
systems, der Eingaben (Text 
oder Ziffern) bis zur Lange 
einer logischen Bildschirm- 
zeile (80 Zeichen) erlaubt, 
allerdings nur im Pro- 
grammodus. Der Computer 
stoppt den Ablaut, gibt ein 
Fragezeichen aus und war- 
tet auf die Eingabe. Manko: 
Dieser Befehl hat einige 
Schwachstellen: 

- Die Eingabezeile kann mit 
dem Cursor jederzeit verlas- 
sen werden, was Fehleinga- 
ben geradezu vorprogram- 
miert. 

- Bestimmte Trennzeichen 
nimmt der INPUT-Modus 
nicht an oder unterbricht das 
Programm nach AbschluB 
der Eingabe mit 
< RETURN > durch eine 
Fehlermeldung: <:> (Dop- 
pelpunkt) und <,> (Kom- 
ma). Diese Zeichen produ- 
zieren den Fehler »Extra ig- 
nored". 

- Wurde hinter der INPUT- 
Anweisung eine numeri- 
sche Variable definiert (z.B. 
A), durfen nur die Ziffern 
bis 9 zur Eingabe verwendet 
werden (auch Realzahlen 
mit Nachkommastellen sind 
moglich!). Andernfalls mel- 
det sich der Computer mit 
»Redo from Start« (noch- 
mals von vorn!). Setzen Sie 
aber vor die Zeichenketten- 
eingabe ein Anfuhrungszei- 
chen, ubernimmt der Com- 
puter auch die verbotenen 
Zeichen <:> und <,>! 

Werden String-Eingaben 
verlangt (z.B. A$), akzeptiert 
INPUT alle erlaubten Zei- 
chen auf der Tastatur. Nach- 
teil: Zahlen werden eben- 
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Nach RUN erscheint in der obersten Bildschirmzeile die INPUT- 
Abfrage. Tippen Sie nun beliebige Namen ein. Falls Sie die Eingabe 
abbrechen mochten, drucken Sie lediglich die RETURN-Taste: Ihre 
bisherigen Eingaben erscheinen auf dem Bildschirm. Jeder weitere 
Tastendruck beendet das Beispielprogramm. 

Zeile 20: Eine Schleife erzeugt den String LN$, der 38 Querstriche 
enthalt. 

Zeile 30: EG ist die maximaleZahl der INPUT-Eingaben. Man uber- 
nimmt sie in die DIM-Anweisung zu EG$. 

Zeile 40: Der Obergriff des Datenfelds fur die 20 Eingaben heiBt 
»Name« und wird der Variablen DF$ zugewiesen. 

Zeile 50: Hier beginnt die Eingabeschleife: Der INPUT-Befehl soli 
laut dem Wert von EG 20mal aufgerufen werden. 

Zeile 52: ist der »Notausgang«. Ist der aktuelle Eingabestring leer 
(weil nur die RETURN-Taste gedriickt wurde), springt das Programm 
zu 

Zeile 60: Der Bildschirm wird geloscht, der Datenfeldname und der 
Strich LN $ tauchen auf der Bildflache auf. 

Zeile 70: Nun gibt der Computer innerhalb einer Schleife die bis- 
lang gesammelten Eingaben EG$(I) aus. 

Zeile 1000: wartet auf einen Tastendruck und beendet das Pro- 
gramm. 
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Prinzipiell geht das nachste Dateneingabeprogramm genauso vor, al- 
lerdings erlautern wir nur die Programmzeiien, die sich von eindim 
unterscheiden: 

Zeile 30: EG legt in diesem Beispiel sieben Datensatze fest, die Je- 
wells auf vier Eingaben bestehen (DF). Die DIM-Anweisung beriick- 
sichtigt jetzt zweidimensionale Arrays. 

Zeile 40: Die Bezeichnungen der vier Datenfelder speichert der 
Computer in der eindimensionalen Feldvariablen DF$(DF): Name, 
StraBe, Wohnort und Telefon. 

Zeile 50: Pro Dimension muB die entsprechende Schleife aufge- 
macht werden: FOR 1=1 TO 7 (EG), FOR J=1 TO 4 (DF). Die INPUT- 
Fragen erscheinen. 

Zeile 59: Urn bei der Bildschirm-Eingabe eine Abtrennung zwi- 
schen den Datensatzen zu erreichen, muB man zwischen die beiden 
NEXT-Befehle ein PRINT setzen. 

Zeile 60: Die vier Datenfeldbezeichnungen bringt der Computer mit 
der Schleife K auf den Bildschirm und gibt durch Zeile 70 die Daten- 
satze mit jeweils vier Eintragen aus (Abb.4). 

Rechnen Sie's nach: 28 Eingaben (7 x 4) sind bei diesem zweidi- 
mensionalen Array moglich. 



falls als Strings identifiziert 
und konnen nicht zu Berech- 
nungen verwendet werden. 
Die INPUT-Anweisung darf 
auch Hinweistext enthalten, 
dahinter muB sich - abge- 
trennt durch das Semikolon 
< ; > der Variablenaus- 
druck des entsprechenden 
Typs befinden. Es durfen 
auch indizierte Variablen 
sein. Einige Beispiele: 

10 input "Geben Sie 
eine Zahl ein";z 

Der C64 erwartet eine 
Real- oder Integerzahl, die 
in der Variablen Z gespei- 
chert wird. Diese Zahl kann 
im weiteren Programmver- 
lauf zu Berechnungen ver- 
wendet werden. 

10 input "Ihr Text:";a$ 



Jetzt stehen alle Zeichen 
auBer <:> und <,> auf 
der Tastatur fur die Eingabe 



zur Verfiigung. Wer ganz si- 
cher gehen will, sollte die 
Zeichenkette mit dem An- 
fuhrungszeichen beginnen 
lassen. Dann kann man so- 
gar Farb- und Steuerzei- 
chen (z.B Cursor-Bewegun- 
gen) in die spatere Textaus- 
gabe einbinden! 

Eine weitere Variante des 
INPUT-Befehls bereitet dem 
Basic-Interpreter ebenfalls 
keine Schwierigkeiten: Meh- 
rere INPUT-Fragen, auch 
verschiedenen Variablen- 
typs, hintereinander: 

10 input "Tag, Monat, Jahr, 
Name, Nr.";dd$, mm$ , yy$ , 
nm$,nr 

Beachten Sie, daB zwar 
unmittelbar hinter der 
INPUT-Anweisung ein Se- 
mikolon stehen muB (vor 
DD$). Alle weiteren Varia- 
blen durfen jedoch nur 
durchs Komma verbunden 
sein (sonst gibt's einen 
»Syntax error«). Ab der Fra- 
ge zur zweiten Variable mel- 
det sich der Computer im- 
mer mit zwei Fragezeichen. 

Wer statt des Basic-Be- 
fehls INPUT lieber die Be- 
triebssystemroutine SYS 
65487 ($FFCF) benutzen 
will, sollte sich das Beispiel 
input. sys von der Diskette 
laden. 

Vorteile von INPUT: Die 
Anweisung enthalt nutzliche 
Editorfunktionen (Loschen 
des Eingabetextes mit der 
DEL-Taste, Cursor-Bewe- 
gungen). Positiveingestellte 
Anwender betrachten auch 
die sofortige Ausgabe der 
Fehlermeldungen bei der 
Eingabe (Extra ignored, Re- 
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Dieses Demo aktiviert die Systemroutine $FFCF (SYS 65487), die 
man als Ersatz fur INPUT verwenden kann. input.sys laBt sich als Un- 
terroutine in eigenen Programmen verwenden (mit GOSUB ansprin- 
gen und RETURN verlassenl). Ein groBer Vorteil: Das storende Frage- 
zeichen wird dabei nicht ausgegeben! 

Zeile 10: Aufruf der Betriebssystemroutine. Sie komtrolliert den In- 
halt von Adresse 780. Sie entspricht dem Register A (Akkumulator bei 
der C-64-Assemblerprogrammierung). 

Zeile 20: uberpruft, ob der empfangene Tastendruck die RETURN- 
Taste war (Akku = 13). Falls ja, verzweigt das Programm zu Zeile 50. 

Zeile 25: Da die Eingabezeile nur der Wert einzelner Tasten regi- 
stries, muB die Variable EG$ urn den Inhalt jedes weiteren Tasten- 
drucks (PEEK(780)) erganzt werden. 

Zeile 40: Rucksprung zu Zeile 10, urn den nachsten Tastenwert ein- 
zulesen. 

Zeile 50: bringt die eingegebenen Zeichen auf den Bildschirm. Sie 
konnen im Gegensatz zu INPUT jedes beliebige Zeichen verwenden. 
Die Cursortasten sind zwar nicht gesperrt, aber das Verlassen der Ein- 
gabezeile bringt weder falsche Strings noch eine Fehlermeldung. 
Fehleingaben durfen mit der DEL-Taste eliminiert werden. 
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do from Start) als Vorteil: 
Man erkennt sofort, was 
man falsch gemacht hat. 

Auf geordnete und struk- 
turierte Eingabemasken des 
Bildschirms wirken sich die 
Fehlermeldungen aller- 
dings verheerend aus: Die 
Maskewirdzerstort. Ebenso 
sollte eine Sperre bestehen, 
die verhindert, da6 sich der 
Eingabe-Cursor aus Verse- 
hen selbstandig macht und 
auf dem gesamten Bild- 
schirm herumfuhrwerkt. 
GET-Anweisung 

Dieser Befehl liest jeweils 
ein Zeichen von der Tasta- 
tur. Der ASCII-Wert (CHR$) 
laBt sich in einer String-Va- 
riablen speichern. Je nach 
Eingabenlange erhoht sich 
auch die Lange der Zeichen- 
kette. Erlaubt sind alle Zei- 
chen, Ziffern werden eben- 
falls als Strings behandelt. 
Vorteil: Sie konnen die ent- 
sprechenden Editorfunktio- 
nen nach Ihren Wunschen 
programmieren: Sperren 
der Tasten <HOME>, 
<CRSR abwarts/auf- 

warts> , nur bestimmte Ein- 
gabezeichen zulassen usw. 
Die entsprechende Basic- 
Routine bringt das Pro- 
gramm get.bas. Es benotigt 
auf jeden Fall weniger Spei- 
cherplatz als get.sys, das 
die Betriebssystemroutine 
SYS 65508 ($FFE4) verwen- 
det. 

Ein gravierender Nachteil 
von GET: Man sieht keinen 
Eingabe-Cursor und weiB 
nie genau, in welcher Spalte 
er sich gerade befindet. Edi- 
torbewegungen in der Ein- 
gabezeile mit <CRSR 
links/rechts> werden damit 
zum Gliicksspiel. Dazu bie- 
tet die Adresse 204 in der 
Zeropage des C64 eine Al- 
ternative, die einen blinken- 
den Eingabe-Cursor an der 
aktuellen Bildschirmposi- 
tion erzeugt (POKE 204,0), 
doch istesauch hierGlucks- 
sache, ob er nach getaner 
Arbeit (POKE 204,1) ver- 
schwindet Oder nicht: Oft 
bleibt ein storender Cursor- 
Block auf dem Bildschirm 
zuruck. Wenn Sie's trotz- 
dem versuchen mochten, 
erganzen Sie die Zeilen des 
Listings get.sys: 

10 sys 65508: poke 204,0 
40 poke 20-4,1: goto 10 



Diese geanderte Version 
finden Sie unter dem Datei- 
namen get.curs ebenfalls 
auf der Diskette. 

Basic fallt Entschei- 
dungen 

Die folgende Befehlsfolge 
bringt im Prinzip die gesam- 
te Intelligenz von Basic 2.0 
auf einen Nenner: 
IF-THEN-Anweisung 

Damit entscheidet das 
Programm, wie es sich bei 
bestimmten Bedingungen 
verhalten soil: Es kann ein 
Unterprogramm aufgerufen 
werden, der Computer in ei- 
ner Warteschleife verharren 
Oder das Programm been- 
den. Welche Kriterien der 
C64 befolgen soil, bestim- 
men Sie im Programm. Da- 
zu mussen Sie die Ver- 
gleichsoperatoren von Basic 
2.0 verwenden. Einige Bei- 
spiele: 

IF X=Y THEN.. . 

X besitzt exakt denselben 
Wert wie Y. 

IF XOY THEN... 



X unterscheidet sich von 
Y. 

IF X>Y THEN... 

X ist groBer als Y. 

IF X<Y THEN... 

X ist kleiner als Y. 

IF X>=Y THEN... 

X hat einen groBeren Oder 
den gleichen Wert wie Y. 

IF X<=Y THEN... 

X ist kleiner Oder zumin- 
dest gleich mit Y. 

Es lassen sich numeri- 
sche Variableninhalte, Zah- 
len, Rechenergebnisse und 
Strings vergleichen. Wenn 
das Vergleichsergebnis lo- 
gisch wahr ist (—1), ver- 
zweigt der Computer zur 
programmierten Reaktions- 
rputine. Findet er keine 
Ubereinstimmung (logisch 
falsch = 0), berucksichtigt 
der Basic-Interpreter nicht 
mehr die Anweisungen hin- 
ter THEN und geht zur nach- 
sten Zeile. 

IF-THEN-Anweisungen 
lassen sich auch verschach- 
teln: 

IF X>Y THEN IF A=B THEN... 
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Zeile 10: wartet auf die Eingabe von der Tastatur (T$). 

Zeile 20: fragt unerlaubte Tastencodes ab (<CRSR auf- 
warts/abwarts>, <HOME>). Hat sich einer eingeschlichen, wird er 
nicht berucksichtigt (T$=0). 

Zeile 30: War T$ die RETURN-Taste, springe zu Zeile 50! 

Zeile 40: Gib das Zeichen der aktuellen Taste (T$) aus und fiige es 
an die sich bereits in der Eingabezeile befindlichen an! 

Zeile 42: EG$ wird mit T$ erweitert. Die gesamte Zeichenkette ist 
jetzt urn dieses Zeichen langer. 

Zeile 45: Riicksprung zu Zeile 10 (Aufruf der Systemroutine). 

Zeile 50: wird angesprungen, wenn die RETURN-Taste gedriickt 
war: EG$ erscheint zum Test nochmals unter der Eingabe auf dem 
Bildschirm. 
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Diese Variation aktiviert die Betriebssystemroutine von GET: $FFE4 
(65508). Auch hier dient die Speicherstelle 780 als Register (Akku). 

Zeile 10: Die Systemroutine wird aktiviert, der Computer erwartet 
einen Tastendruck. 

Zeile 13: Unerlaubte Tasten (s. get.bas, Zeile 20) haben keine Chan- 
ce: CH R$-Code 17 ist < CRSR abwarts > , Nr. 145 entspricht der Taste 
<CRSR aufwarts> und 19 bezeichnet die HOME-Taste. Befinden 
sich diese Werte im Akkumulator, wird der Inhalt von Adresse 780 ge- 
loscht (POKE 780,0). 

Zeile 18: Falls der Akkumulator (780) leer ist, kehrt das Programm 
zur Eingaberoutine zuruck. 

Zeile 20: Nach Druck auf die Taste < RETURN > verzweigt get.sys 
zu Zeile 50. 

Zeile 22: Gib den Inhalt der Speicherstelle 780 als CHR-Code aus! 

Zeile 25: Bilde eine Zeichenkette aus den Werten der jeweils ge- 
druckten Tasten! 

Zeile 40 bis 50: stimmen mit der Erlauterung zu get.bas uberein. 



Ziemlich verwirrend, 
nicht? Eleganter ist hier der 
Einsatz logischer Operato- 
ren: AND, OR, NOT. Nach- 
teil: Die Programmausfuh- 
rung dauert einiges langer 
als bei der unubersichtli- 
chen Version! 

Ihre Basic-Zeile konnte 
jetzt so aussehen: 

IF X>Y AND A=B THEN... 

AND-Verkniipfung: Das 

Programm verzweigt nur 
dann, wenn X groBer als Y 
und A gleich B ist. 

IF A<C OR X>Y THEN... 

OR-Verknupfung: Es ge- 
niigt bereits, wenn nur eine 
der beiden gestellten Bedin- 
gungen erfullt ist: Entweder 
ist A kleiner als C Oder X 
groBer als Y. 

IF A=N0T C THEN.. . 

NOT negiert jede positive 
Zahl und addiert -1. Trifft 
NOT auf Minuszahlen, wer- 
den diese positiv, sind aber 
urn »1« reduziert: Das Ver- 
gleichsergebnis wird also 
umgedreht! Beispiele: 
C = 17, NOTC = -18, 
C = -17, NOTC = 16, 
NOT0 = -1, NOT-1 = 0. 

Sicher reizvoll fur Mathe- 
Freaks, kommt die NOT- 
Verknupfung in Basic- 
Programmen sehr selten 
vor. Fur Interessierte gibt's 
das Programmbeispiel not 
auf der Diskette zu unserem 
Sonderheft. 

Ist eine IF-THEN-Bedin- 
gung erfullt, muB bei Basic 
2.0 die Reaktionsroutine in 
derselben Basic-Zeile, di- 
rekt hinter THEN stehen 
(oder ein entsprechender 
Sprungbefehl zu einem Un- 
terprogramm mit GOSUB 
Oder GOTO). Programm- 
technisch ist zwar moglich, 
die Reaktion in die nachsten 
Zeilen zu setzen, die der IF- 
THEN-Abfrage folgen. Be- 
achten Sie aber, daB dann 
dieser Programmabschnitt 
immer ausgefiihrt wird - 
egal, ob die geforderte Be- 
dingung logisch wahr oder 
unwahr ist! 

Wo soil's hinge- 
hen? 



Man plaziert IF-THEN- 
Fragen in Basic-Program- 
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Man kann nach der Eingabe eines Zahlenwerts die Zustande der Va- 
riablen Z auf dem Bildschirm betrachten. 

Zeile 10: Eine INPUT-Abfrage fordert Sie auf, eine Zahl Z zwischen 
1 und 5 einzugeben. 

Zeile 20: Aus den drei moglichen Zustanden von Z bildet man die 
Summe S. 

Zeile 30: Die genannten Zustande sollen auf dem Bildschirm aus- 
gegeben werden. 

Zeile 40: Besitzt die Summe S den Wert -2, haben Sie eine uner- 
laubt kleine Zahl eingegeben, 

Zeile 50: ist die S -1, war die Zahl zu hoch! 

Zeile 60: Erst, wenn S -3 war, ist der Computer zufrieden und mel- 
det O.K.! 



men, damit bei erfullter Be- 
dingung bestimmte Pro- 
grammodule aufgerufen 
werden: Speziell Auswahl- 
menus bieten durchnume- 
rierte Meniipunkte, die man 
mit den Zahlentasten akti- 
vieren kann. Hier ware es 
unnotige Speicherplatzver- 
schwendung, jeder Taste ei- 
ne separate IF-THEN- 
Abfrage zu widmen, etwa 
wie in diesem (miserablen) 
Beispiel: 

IF T$="l" THEN G0S0B 1000 
IF T$="2" THEN G0SUB 2000 
IF T$="3" THEN G0SUB 3000. 

Basic 2.0 stellt hier zwei 
komfortable Befehle zur 
Verfugung: 
ON. ..GO- 
SUB/ON... GOTO 
Anweisung 

Voraussetzung: Dem Be- 
fehlswort »ON« muB immer 
eine numerische Variable 
folgen, die bei »1 « zu zahlen 
beginnt und bei maximal »9« 
endet, wenn Sie nur nach ei- 
nem Tastendruck fragen. 
Normalerweise aber sind 
neun Meniipunkte fur die 
meisten Anwendungen aus- 
reichend. Ausgerustet mit 
dem Wissen urn die GET- 
Routine kann man problem- 
los mehrere Tastenbewe- 
gungen abfragen und das 
Programm reagieren las- 
sen. Die Abfrage fur unser 
IF-THEN-Beispiel sieht jetzt 
vollig anders aus: 

ON X G0SUB 1000,2000,3000. 



Wird die Zahlentaste als 
Buchstabe von A bis Z ein- 
gelesen (z.B. T$), mul3 man 
diesen in der ON...GOSUB- 
Anweisung in eine Zahl um- 
wandeln: 



Die numerische Variable 
hinter ON darf auch das Er- 
gebnis einer Berechnung 
sein, allerdings berucksich- 
tigt der Basic-Interpreter da- 
bei nur Integerzahlen: 
Nachkommastellen werden 
abgeschnitten! 

Die beiden Demo-Pro- 
gramme on.ziffer und 
on. letter zeigen Beispiele, 



wie man Menus mit Ziffern- 
und Buchstabentasten akti- 
viert. Basic kann also Sprun- 
ge auf beliebige Zeilen in- 
nerhalb des Programms 
ausfiihren. Die Vorausset- 
zung zu diesem Hiipfen muB 
keineswegs immer solch 
strengen Regeln unterwor- 
fen sein, die ON-GOSUB/ 
GOTO fordert: eine aufstei- 
gende Reihenfolge, die bei 
»1« beginnt. 

GOTO-Befehl 

Sie konnen diese Anwei- 
sung auch getrennt schrei- 
ben (GO TO). Dahinter muB 
eine Zeilennummer stehen, 
zu der der C64 springt und 
dort mit dem Programm fort- 
fahrt. Der Befehl kann auch 
im Direktmodus angewen- 
det werden. Die Zeilennum- 
mer darf getrost niedriger 
sein als die, in der die GOTO- 
Anweisung steht. Durch 



ON ASC(T$)-64 G0SUB 
2000... 



1000, 
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Zeile 10: Der Bildschirm wird geloscht und auf Kleinschrift umge- 
schaltet. Die Variable FL erhalt den Wert 0. Eine Erklarung, warum wir 
diese Variable unbedingt brauchen, folgt nach der Programmbe- 
schreibung! 

Zeile 20 bis 50: Eine Schleife von 1 bis 9 gibt diese Zahlen mit der 
lapdiaren Bemerkung »Meniipunkt« aus. 

Zeile 60: Von der QET-Routine wird jetzt Ihr Tastendruck erwartet 
und in der Variablen X abgelegt. 

Zeile 70: Je nach Tastenwert (1 bis 9) springt das Programm zum 
gewunschten Meniipunkt. Diese Unterprogramme wurden zur besse- 
ren Ubersicht in den Zeilen 1000 bis 9000 untergebracht. 

Zeile 80 bis 85: Die Variable FL bekommt jetzt Arbeit. Besitzt sie 
den Anfangswert 0, springt das Programm zu Zeile 60. Hat sie den In- 
halt 1 (das geschieht immer, wenn nach Tastendruck ein Unterpro- 
gramm aufgerufen wurde), verzweigt der Computer zum Programm- 
beginn (Zeile 10). 

Zeile 100 bis 120: Dieses Unterprogramm ruft der Computer nach 
Aktivierung eines der neun Meniipunkte auf und gibt den Hinweis aus, 
daB man nach < SPACE > zum Menu zuruckkehren kann. Beachten 
Sie: In Zeile 120 wird FL mit dem Wert 1 ausgestattet! 

Zeilen 1000 bis 9000: Dies sind lediglich Beispielsmenupunkte. 
Sie aktivieren das Unterprogramm in Zeile 100 und kehren mit RE- 
TURN zum Menu zuriick. 

Nun zur Erlauterung der ominosen Variablen FL: Sie dient als Flag 
(Flagge) fur die Zeilen 80 und 85. Normalerweise wurde geniigen, 
wenn in Zeile 80 die Anweisung »GOTO 60« stehen wurde (verzweige 
zur GET-Abfrage). Da aber in Zeile 70 ON mit GOSUB aufgerufen wur- 
de, miissen die Unterprogramme in den Zeilen 1000 bis 9000 immer 
mit RETURN verlassen werden. Das hatte zur Folge, daB der Compu- 
ter erneut in die Zeilen 60 bis 80 zuruckkehren wurde, jedoch niemals 
wieder das Menu ab Zeile auf den Bildschirm brachte! Sie konnten 
das umgehen, wenn Sie jeder Unterprogrammzeile (1000 bis 9000) 
statt mit RETURN mit »GOTO 10« abschlieBen wurden. Doch in die- 
sem Fall wird die GOSUB-Anweisung nicht sauber verlassen, das 
geht nur ilber RETURN: Damit zieht der Computer die Rucksprung- 
adresse wieder von seinem Stapelspeicher (Stack) ab. Wenn Sie die 
Unterprogramme mit GOTO gewaltsam verlassen, wird nach einigen 
Meniipunktaufrufen der Stapel uberlaufen (Overflow Error)! Auf sol- 
che wichtigen Kleinigkeiten sollten Sie bei eigenen Programment- 
wicklungen achten! 

Das Programmbeispiel on. letters macht nichts anderes als das be- 
schriebene, nur sind die Meniipunkte jetzt mit den Buchstabentasten 
A bis I aufzurufen. 



Rucksprunge lassen sich 
sogar Programmschleifen 
(ohne FOR-NEXT) erzeu- 
gen. Findet der Basic-Inter- 
preter die hinter GOTO ste- 
hende Zeilennummer nicht, 
bricht er mit dieser Fehler- 
meldung ab: Undef'd State- 
ment Error. 

Im Vergleich zu noch kom- 
fortableren Basic-Dialekten 
fehlt Basic 2.0 die Option, 
GOTO auf einen variablen 
Wert weisen zu lassen, z.B. 
GOTO X. Der Befehl ver- 
langt unbedingt eine Ganz- 
zahl als Hinweis auf die Zei- 
lennummer. Folgendes Pro- 
gramm ist nicht moglich: 



10 x=100 

20 goto x 

100 print "test' 



end 



Dazu finden Sie eine Mini- 
Basic-Erweiterung (sie funk- 
tioniert allerdings nur in Ma- 
schinensprache) auf unse- 
rer Diskette: goto.x. Laden 
Sie das Programm, und 
starten Sie es mit RUN. Ab 
sofort konnen Sie die Ganz- 
zahl hinter der GOTO-An- 
weisung durch eine bere- 
chenbare Variable erset- 
zen. Als Maschinenroutine 
in eigenen Basic-Program- 
men sollte sie gleich am An- 
fang stehen Oder als Unter- 
programm definiert sein. Sie 
kennt auBerdem noch die 
Anweisungen GOSUB X 
und RESTORE X. Achtung: 
Die Anweisung NEW in Zei- 
le 24 mussen Sie unbedingt 
Ibschen! 
GOSUB-RETURN-Befehl 

Das Stichwort ist bereits 
gefallen: Unterprogramm. 
Selbstverstandlich laBt sich 
so ein Programmteil auch 
mit GOTO aufrufen. Das hat 
aber einen Nachteil: Urn 
wieder in die aufrufenden 
Programmzeilen zuruckzu- 
kehren, muB im Unterpro- 
gramm ein weiterer GOTO- 
Befehl verankert sein, der 
den Rucksprung veranlaBt. 
Ein Beispiel soil das ver- 
deutlichen: 

10 printchr$(l47) 

20 print "Das ist Text 1" 

30 goto 100 

40 print "Das ist Text 2" 

50 goto 100 

60 print "Das ist Text 3" 

70 goto 100 

100 print: print "Taste" 

110 poke 198,0: wait 198,1 

120 printchr$(l47) 

130 goto 40 
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Das Programm soil den 
Bildschirm loschen (Zeile 
10) und drei Texte ausge- 
ben (Zeilen 20, 40 und 60). 
Dazwischen muB es auf ei- 
nen Tastendruck warten. 
Der Bildschirm wird erneut 
geloscht, und der nachste 
Text erscheint auf dem Bild- 
schirm. Urn Platzzu sparen, 
wurde der standig wieder- 
kehrende Aufruf der Taste 
und das Bildschirmloschen 
in einem Unterprogramm ab 
Zeile 100 untergebracht: 
Zeile 110 iiberpriift, ob eine 
Taste gedruckt ist, und Zeile 
120 loscht den Bildschirm. 
In dieser Form (mit GOTO) 
wird das Programm nie kor- 
rekt funktionieren, weil die 

Riicksprunganweisung 
(Zeile 1 30) stets auf die Aus- 
gabe von Text 2 weist. Alle 
nachfolgenden Programm- 
teile werden niemals akti- 
viert! Das ist der Kernpunkt: 
Unterprogramme miissen 
sich aus verschiedenen Po- 
sitionen des Hauptpro- 
gramms aufrufen lassen 
und nach getaner Arbeit 
wieder zum aufrufenden 
Programmteil zuriickkeh- 
ren. Eine Moglichkeit ist die 
Verwendung der Basic- 
Erweiterung goto.x. Dazu 
muB man diese zusatzlichen 
Programmzeilen einfugen: 

25 x=50 
55 x=80 
85 x=95 
95 end 

AuBerdem durfen Sie 
nichtvergessen, in Zeile 130 
den Wert »40« durch die Va- 
riable X zu ersetzen. Jetzt 
funktioniert das Programm 
wie gewunscht. Aber warum 
so umstandlich? Andern Sie 
das Listing erneut: 

30 gosub 100 
60 gosub 100 
90 gosub 100 
130 return 

Loschen Sie noch die Zei- 
len 25, 55 und 85 (sie waren 
nur fur goto.x wichtig!). 
Nach RUN wird der Vorteil 
von GOSUB gegenuber 
GOTO sichtbar deutlich! 
Wer dieses kurze Pro- 
grammbeispiel nicht abtip- 
pen mochte, findet es unter 
dem Namen gosub auf un- 
serer Diskette. 



Innere und tiuBere 
Schleifen 



Was haben z.B. Abfragen 
mit der Programmierung 
von Basic-Schleifen zu tun? 
Eine ganze Menge: Man 
kann mit Schleifen viel Spei- 
cherplatz sparen und Pro- 
gramme tunen. Basic 2.0 
kennt dazu Anweisungen, 
die unmittelbar zusammen- 
hangen: 

FOR-TO-STEP-NEXT- 
Befehl 

Nirgends sonst wird in 
Basic-Programmen die Va- 
riable »i« so oft verwendet: 
Sie dient als Laufvariable 
(Schleifenzahler). Selbstver- 
standlich ist jeder andere 
numerische Variablenaus- 
druck moglich! Wenn die 
Laufvariable den Wert er- 
reicht hat, der hinter TO steht 
und auf die Anweisung 
NEXT trifft, brichtdie Schlei- 
fe ab: Die Aufgabe ist erfullt. 
Das Programm macht mit 
dem nachsten Basic-Befehl 
weiter. Vor allem bei der Da- 
teiverwaltung (Erfassung 
von Eingaben mit INPUT) 
oder beim Einlesen von 
Data-Zeilen kommt kein ver- 
nunftiges Basic-Programm 
ohne Schleifen aus. Natiir- 
lich kann man Basic- 
Schleifen auch ohne FOR- 
NEXT programmieren: 

10 z=0 

20 input"eingabe";eg$(z) 

30 z=z+l 

35 if z=10 then end 

-40 goto 20 

In Zeile 10 wird die Lauf- 
variable auf »0« gesetzt. Zei- 
le 20 bringt den INPUT- 
Befehl und weist die Einga- 
be der eindimensionalen 
Variablen EG$(Z) zu. In Zei- 
le 30 erhoht sich der Wert 
von Z. Urn dem Computer 
mitzuteilen, wann er mit 
dem Zahlen aufhoren soil, 
steht in Zeile 35 der Endwert 
1 innerhalb einer IF-THEN- 
Anweisung. Zeile 40 wird so- 
lange ausgefiihrt, bis die in 
Zeile 35 geforderte Bedin- 
gung wahr ist: Z = 10. Fol- 
gende Basic-Zeilen mit ei- 
ner FOR-NEXT-Schleife er- 
fullen denselben Zweck: 

10 for z=l to 10 

20 input"eingabe";eg$(z) 

30 next 



Diesmal sind wir mit nur 
drei Basic-Zeilen ausge- 
kommen. Diese Routine lie- 
Be sich problemlos auch in 
einer Zeile zusammenfas- 
sen. Alle Anweisungen in- 
nerhalb einer Schleife, die 
nach FOR-TO stehen, wer- 
den bis zur NEXT-Anwei- 
sung ausgefiihrt. Dann er- 
hoht das Programm die 
Laufvariable urn die ange- 
gebene Schrittweite STEP 
und durchlauft erneut die 
Schleifenroutine. Fehlt 

STEP, erhoht der Computer 
den Schleifenzahler auto- 
matisch um »1 «. 

Schleifen kann man ver- 
schachteln. Dabei gilt: Die 
Schleife, die als erste geoff- 
net wurde, muB als letzte ge- 
schlossen werden! Unser 
Beispiel enthalt einen Kardi- 
nalfehler: 

10 for a=l to 10 
20 for b=l to 5 
30 print a,b 
<+0 next a 
50 next b 

Nach RUN erhalten Sie 
eine Fehlermeldung: Next 
without for. Das Programm 
offnet die Schleifen A und B, 
arbeitet A zehnmal ab (das 
bewirkt das NEXT in Zeile 
40), findet aber kein NEXT 
zu Schleife B (diese Anwei- 
sung steht namlich in Zeile 
50!). Ist Schleife A korrekt 
bearbeitet, hat das Pro- 
gramm die FOR-Anweisung 
von Schleife B bereits ver- 
gessen und betrachtet das 
NEXT in Zeile 50 als eigen- 
standigen Befehl (ohne 
FOR). Vertauschen Sie die 
Inhalte der Zeile 40 und 50, 
dann klappt's! Als Beispiel 
fur eine verschachtelte 
Schleife finden Sie auf der 



Diskette das Programm 
schachtel: Es erzeugt ein 
Liniengitter auf dem Bild- 
schirm (Abb. 4). 

Eine FOR-NEXT-Schleife 
besitzt immer diese Schreib- 
weise: 

FOR Schleifenvariable = 
Anfangswert TO Endwert 
STEP Schrittweite 

(Befehle innerhalb der 
Schleife) 

NEXT Schleifenvariable 

Die Schrittweite laBt sich 
beliebig einstellen: 

FOR T=0 TO 14 STEP 2 

setzt die Laufvariable auf 
Null und zahlt bis 14, aber in 
Zweierschritten: Die Befeh- 
le in der Schleife werden al- 
so nur siebenmal (14:2) aus- 
gefiihrt! 
Auch ruckwarts geht's: 

FOR T=l4 TO STEP -1 

Hier muB die gewunschte 
Schrittweite als Minuszahl 
angegeben werden. 

Dezimalbriiche sind 

ebenfalls moglich: 

10 for t=0 to 20 step .66 
20 print t 
30 next 

Beachten Sie: Der NEXT- 
Befehl priift nie, ob die Lauf- 
variable bereits den einge- 
stellten Wert angenommen 
hat, sondern nur, ob sie gro- 
Ber ist! Erst dann verlaBt das 
Programm die Schleife. 
Wenn Sie das Basic-Pro- 
gramm mit RUN gestartet 
haben und alle 0,66-Werte 
zwischen »1« und »20« auf 
dem Bildschirm erschienen 
sind, iiberpriifen Sie den 
Schleifenzahler: 

PRINT T 




[4] Verschachtelte Schleifen erzeugen farbige Rechtecke 
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Als Ergebnis erhalten Sie: 
20.14 (statt 20). Bei man- 
chen Programmablaufen 
kann es jetzt notig werden, 
die Variable T wieder auf 
den gewunschten Wert zu- 
ruckzusetzen (z.B. T = 20)! 

Wie spat ist es, 
bine? 

Der C64 besitzt eine innere 
Uhr, die man abfragen, zu 
Messungen oder zur Pro- 
grammsteuerung verwen- 
den kann. Sie startet nach 
dem Einschalten immer mit 
»0«. Diese beiden System- 
variablen sind zustandig: 
Tl und Tl$ 

Die interne Uhr des C64 
laBt sich beeinflussen: Will 
man den aktuellen Stand 
wissen, fragt man den Inhalt 
der Variablen Tl ab. Dazu 
gibt's eine Endlosschleife, 
die jeder Basic-Einsteiger 
kennt: 

10 print ti: goto 10 

Auf dem Bildschirm sieht 
man nach dem Start mit 
RUN ein »ewiges« Zahlen- 
band mit sich standig an- 
dernden Werten. 

Diese Zahl, geteilt durch 
60, gibt uns die Zeit an, die 
seit dem Einschalten des 
Computers oder Umstellen 
der internen Uhr vergangen 
ist. Will man die Minuten 
wissen, muB man die Zahl 
von Tl durch 3600 teilen, bei 
Stunden durch 21 600. Wer 
schwach im Kopfrechnen 
ist, tut sich mit der anderen 
Systemvariablen des Basic- 
Interpreter leichter: Tl$. Sie 
gibt die Zeit ebenfalls sechs- 
stellig aus, aber bereits um- 
gerechnet in Stunden, Mi- 
nuten und Sekunden. Der 
Wert »1 24533« bedeutet bei- 
spielsweise: 12 h, 45 min 
und 33 s. Mit dieser Anwei- 
sung erscheint Tl$ auf dem 
Bildschirm: 

10 printti$: goto 10 

DasZahlenband, das jetzt 
durchlauft, verandert sich 
nur noch im Sekundenrhyth- 
mus. Durch den Einsatz von 
Tl$ laBt sich die innere Uhr 
auch stellen: 

TI$= "000000" 

setzt sie auf den Anfangs- 
wert »0«, 

TI$= "233000" 

beispielweise auf 23 Uhr 30. 



Kurzinfo: stoppuhr 



Zeile 110 setzt die Zeitvariable auf 0, dann wird der Bildschirm ge- 
loscht. In Zeile 140 schreibt der Computer hintereinander jede Menge 
Sternchen auf den Bildschirm. Zeile 150 pruft, ob eine Taste gedruckt 
ist oder nicht (wenn nicht, hat die dafiir zustandige Speicherstelle 203 
stets den Inhalt »64«). In Zeile 160 springt das Programm zuruck zu 
140. Wurde eine beliebige Taste gedruckt, hupft das Programm zu Zei- 
le 180, gibt einen Zeilenvorschub auf dem Bildschirm und anschlie- 
Bend die Sekundenzahl fur die Zeitspanne aus, die seit dem Start mit 
RUN vergangen ist. Wichtig: Wenn Tl den Wert »5184000« annimmt, 
entspricht dies einer Laufzeit von 24 h. Wie bei einer echten Uhr be- 
kommt die Systemvariable jetzt wieder den Wert 0: Ein neuer Tag be- 
ginnt... Das laBt sich mit folgendem Listing leicht uberpriifen: 
10 ti$= "235930" 

20 printti$,ti 

30 goto 20 

Wenn Sie das Programm nach dem Start mit RUN 30 s laufen lassen, 
konnen Sie auf dem Bildschirm beobachten, wie die Zeit kippt. 



Nach < RETURN > beginnt 
die Uhr mit der Zeitnahme. 
Folgendes Listing (es befin- 
det sich auf der Diskette) si- 
muliert eine Stoppuhr: 

110 ti$= "000000" 

120 printchr$(l47) 

140 print "#"; 

150 ifpeek(203)< >64 

thenl80 

160 goto 140 

180 print 

190 print ti/60"sek" 

200 end 

Die Erlauterung finden 
Sie im entsprechenden 
Kurzinfo-Kasten. Eineande- 
re Form der Zeitubersicht 
am Computer bringt ein wei- 
teres Basic-Programm auf 
der Diskette: zeitanzeige. 

Rein zuftillig... 

Nicht urn fixierte, sondern 
urn zufallige Werte geht's in 



unserem nachsten Kapitel: 
RND-Funktion 

Sie nimmt sofort nach 
dem Einschalten des Com- 
puters ihre Arbeit auf. Wenn 



Sie die Funktion nicht akti- 
vieren, bleibt sie naturlich 
unsichtbar und wirkt nur im 
Hintergrund. Damit gene- 
riert der Computer eine Zu- 
fallszahl zwischen und 1. 
Gerade bei Spielen und Gra- 
fik, seltener bei mathemati- 
schen Berechnungen, ist es 
oft notig, von zufallig ent- 
standenen Zahlen auszuge- 
hen. Die Basic-Funktion lau- 
tet: RND(X). Das X in Klam- 
mern ist das Argument. Es 
kann drei unterschiedliche 
Werte besitzen: 

- positiv (egal, welche Zahl), 

- negativ, 

- die Zahl 0. 

Experimentieren Sie mit 
folgenden Programmzeilen: 

10 a=rnd(l) 
20 print a 
30 goto 10 



Kurzinfo: rnd( 0)/rnd(1) 



Gesteuert durch diese Zufallsfunktion erscheinen farbige Blocke 
auf dem Bildschirm. 

Zeile 10: stellt die Farbe Schwarz fur Hintergrund und Rahmen 
ein, loscht den Bildschirm. 

Zeile 30: In einer Schleife wird der Bildschirm mit dem Wert 
»160« (=inverser Block, <SHIFT SPACE>) beschrieben, der eben- 
falls schwarz ist. 

Zeile 40: Ins Farb-RAM ab 55296 POKEt das Programm nun zu- 
fallige Farbwerte. Sie andern die Farben der < SHIFT SPACE >- 
Zeichen auf dem Bildschirm, ebenfalls an zufallig gewahlten Posi- 
tionen. 

Zeile 45: Falls Sie eine Taste driicken (Inhalt von 203 anders als 
64), endet das Programm. 

Zeile 50: Endlosschleife zu Zeile 40. 

Nach einer gewissen Zeit stellt man fest, daB sich trotz rein zufal- 
ligen RND-Anweisungen eine sichtbare Ordnung auf dem Bild- 
schirm entwickelt (Abb.) 

Beim Listing rnd(1) liegt der einzige Programmunterschied im 
Argument des RND-Befehls. Hier laBt sich aber deutlich erkennen, 
da6 die Farbwerte echt zufallig auf dem Bildschirm verteilt werden 
(Abb. 5 u. 6). 



Kurzinfo: zeitanzeige 



Zeile 20 bis 30: fordert Sie auf, die aktuelle Zeit im Format HH.MM.SS 
(Stunden, Minuten und Sekunden mit zwei Ziffern, jeweils durch ei- 
nen Punkt getrennt), einzugeben. 

Zeile 30: Das ist die INPUT-Routine, ausgestattet mit einem kleinen 
Trick: POKE 19,64 vor dem INPUT-Befehl unterdriickt das lastige Fra- 
gezeichen. Ihre Eingabe wird in der Variablen ZT$ gespeichert. 

Zeile 50: bearbeitet die Eingabe und weist sie Tl$ zu. Da die eintipp- 
ten Punkte zwischen den Zeiteinheiten bei Tl$ einen "Syntax Error« 
erzeugen wurden, muB Ihre Eingabe in drei Teile aufgegliedert wer- 
den: Mit MID$ (s. Beschreibung!) 

Zeile 60: positioniert die Cursorposition in Spalte 32, Zeile des 
Bildschirms. 

Zeile 70: Die Variable Tl$ wird erneut per MID$ in drei Teile gespal- 
ten, urn dazwischen Doppelpunkte zu plazieren (wie bei Digitalanzei- 
gen ublich!) 

Zeile 80: Wurde keine Taste gedruckt (dann ist der Inhalt von Adres- 
se 203 immer »64«), zeigt das Programm die laufende Zeit an (Sprung 
zu Zeile 60 und 70). 

Nach dem Start mit RUN ist der C64 allerdings von diesem Basic- 
Programm blockiert: Sie konnen nichts anders mit ihm anstellen. Da- 
zu muBte die Zeitangabe durch ein Maschinenprogrammerzeugt wer- 
den, das in den Interrupt eingebunden ist... 



Wie schon seit dem Kapi- 
tel uber Tl und Tl$ bekannt, 
liefert der Computer jetzt 
wieder eine Zahlenkolonne. 
Alle Werte liegen zwischen 
und 1 (z.B. .450032866). Ab 
und zu tauchen in der Zah- 
lenreihe merkwiirdige Zif- 
fernfolgen auf: mit einer Zahl 
vor dem Dezimalpunkt und 
einem »E«, dem eine Minus- 
zahl folgt, z.B. »3.80238951E 
-03«. Hier handelt es sich 
urn Gleitkommakonstanten 
in der Exponentialdarstel- 
lung. Sie bestehen aus einer 
ganzen Zahl oder Festkom- 
mazahl (Mantisse), gefolgt 
vom Buchstaben »E« und ei- 
ner ganzen Zahl im Bereich 
zwischen -39 und +38. Die- 
ser Wert ist der Exponent 
zur Basic 10. Verstandlich 
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WICHTIGE HINWEISE 

zur beiliegenden Diskette: 

Aus den Erfahrungen der bisherigen Sonderhefte mit Diskette wollen wir 
ein paar Tips an Sie weitergeben: 

1 

2 



3 



Bevor Sie mit den Programmen auf der Diskette arbeiten, sollten Sie unbedingt 
eine Sicherheitskopie der Diskette anlegen. Verwenden Sie dazu ein beliebiges 
Kopierprogramm, das eine komplette Diskettenseite dupliziert. 

Auf der Originaldiskette ist wegen der umfangreichen Programme nur wenig 
Speicherplatz frei. Dies fiihrt bei den Anwendungen, die Daten auf die Diskette 
speichern, zu Speicherplatz-Problemen. Kopieren Sie daher das Programm, mit 
dem Sie arbeiten wollen, mit einem File-Copy-Programm auf eine leere, 
formatierte Diskette und nutzen Sie diese als Arbeitsdiskette. 

Die Riickseite der Originaldiskette ist schreibgeschiitzt. Wenn Sie auf dieser 
Seite speichern wollen, mtissen Sie vorher mit einem Diskettenlocher eine 
Kerbe an der linken oberen Seite der Diskette anbringen, um den 
Schreibschutz zu entfernen. Probleme lassen sich von vornherein vermeiden, 
wenn Sie die Hinweise unter Punkt 2 beachten. 
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ALLE PROGRAMME 



aus dies em Heft 
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Copyright-Erkltirung 



Anschrift: 

Datum: 

Computertyp: 

Benotigte Erweiterung/Peripherie: 

Datentrager: Kassette/Diskette 

Programmart: 

Ich habe das 18. Lebensjahr bereits vollendet 
, den .. 



Bankverbindung: 

Bank/Postgiroamt: 

Bankleitzahl: 



Konto-Nummer: 

Inhaber des Kontos: 



Das Programm/die Bauanleitung: 



64'er ubersandt habe, 
nicht teilweise, anderen 
ogramm/die Bauanlei- 
ld liegt zur Zeit keinem 
;h bin damit einverstan- 



(Unterschrift) 

Wir geben diese Erklarung fur unser minderjahriges Kind als 
dessen gesetzliche Vertreter ab. 



den 



das/die ich der Redaktion der Zeitschr 
habe ich selbst erarbeitet und nicht, auc 
Veroffentlichungen entnommen. Das 
tung ist daher frei von Rechten anderer 
anderen Verlag zur Veroffentlichung vor 
den, daB die Markt & technik Verlag AG Mas Programm/die Bau- 
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tigt, wie beispielsweise durch Herstellung von Disketten, auf de- 
nen das Programm gespeichert ist, oder daB sie Gerate und Bau- 
elemente nach der Bauanleitung herstellen laBt und vertreibt bzw. 
durch Dritte vertreiben laBt. 

Ich erhalte, wenn die Markt & Technik Verlag AG das Pro- 
gramm/die Bauanleitung druckt oder sonst verwertet, ein Pau- 
schalhonorar. 
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LADEHILFE 



Disklader - Programme laden mit Komfort 



Disketfenoberfl 



Keine umstand lichen 
Ladeanweisungen und ein \ 
iibersichtliches Inhalts- 




Entwicklungshelfer sind 
gefragt, denn noch im- 
mer sind einige Arbeits- 
schritte notig, um beim C64 
ein Inhaltsverzeichnis von 
der Diskette zu erhalten. Au- 
Berdem erschweren manche 
Unterdateien zu einem Pro- 
gramm die Ubersicht im "Di- 
rectory". Genau hierfur fin- 
den Sie einen »Feuerwehr- 
mann« auf der ersten Seite 
der beiliegenden Diskette - 
den »Disklader«. Er generiert 
eine Benutzeroberflache fur 
Ihren C64. Darin sind Funk- 
tionen integriert, wie: 

- Anwahl einzelner Program- 
me (mit jeweiliger Kurzbe- 
schreibung), 

- automatisches Laden und 
Starten von Diskette Oder 

- Erkennung der richtigen 
Diskette bzw. Diskettenseite. 

Da sich der Disklader an 
erster Stelle auf der Diskette 
zum Sonderheft befindet, 
genugt es, zum Laden einzu- 
geben: 

LOAD":*", 8 

Nach der Bestatigung mit 
< RETURN > dauert es ca. 
15 s, bis die Datei im Spei- 
cher ist. Sie starten mit RUN 
und < RETURN >. An- 
schlieBend wird das File ent- 
packt (ca.2 s) und es er- 
scheint die Benutzeroberfla- 
che des »Disklader« (s. Abbil- 
dung). In der rechten unteren 
Bildschirmhalfte sehen Sie 
weiB umrandet den Namen 
des ausgewahlten Pro- 
gramms. Die unterste Bild- 
schirmzeile ist die dazuge- 
horige Kurzerklarung. Zu- 
satzlich finden Sie in der 
rechten unteren Bildschirm- 
halfte den Text »Seite 1 auf 
Disk« oder »Seite 2 auf Disk«. 
Da Sie die Inhaltsverzeich- 
nisse beider Seiten (ohne die 
Disk zu wenden) durchblat- 
tern konnen, finden Sie hier 



verzeichnis der Diskette auf dem 
Bildschirm. Unser »Disklader « 
erfullt auch gehobene Anspriiche. 



von Herbert GroBer 




| m i Cft FA HUT LDftD 



EMNEflBEBERflETE 



SEITE 1 AUF DISK 



MHWpJ : !B! TE " 



<CRSRt>= Blatternt 
CCRSR4->= B latter n 4. 



.angewahltes 
programm 



. Kurzerklarung fur das 
angewahlte Programm 



Seite auf der Diskette 

und Feld fur Fehlermeldungen 



den Hinweis, auf welcher 
Diskettenseite sich das ge- 
wahlte Programm befindet. 

Durch Tastendruck 

<CRSR aufwarts> bzw. 
<CRSR abwSrts> wahlen 
Sie das nachste oder vorhe- 
rige Programm. Sie blattern 
quasi durch den Inhalt der 
Programme. <HOME> 
bringt Sie zum ersten Eintrag 
des Inhaltsverzeichnisses. 
Selbstverstandlich sind nur 
die Programme verzeichnet, 
die sich eigenstandig laden 
oder starten lassen. 

< RETURN > fuhrt Sie 



in den Ladeteil. Ist kein Dis- 
kettenfehler aufgetreten, er- 
scheint kurzzeitig »00,OK, 
00,00« am Bildschirm. Even- 
tuelle Fehleranzeigen blei- 
ben sichtbar am Bildschirm 
(z.B. »21,READ ERROR, 
18,00«= Drive not ready). Sie 
lassen sich durch einen be- 
liebigen Tastendruck wieder 
loschen. Schlagen Sie bitte 
vorher im Handbuch Ihrer 
Floppy nach und beseitigen 
Sie den Fehler. Eine andere 
Art der Fehlermeldung wird 
durch einen blinkenden Text 
dargestellt (z.B. »Bitte Disk 



Kurzinfo: Disklader 



Programmart: Hilfsprogramm zum Laden der Programme auf der 

beiliegenden Diskette 

Laden: LOAD":*", 8 

Starten: nach dem Laden mit RUN 

Steuerung: Tastatur 

Programmautor: H. GroBer 



wenden« oder »Falsche Dis- 
kette"). Sind Fehler ausge- 
blieben, ladt der Disklader 
das von Ihnen gewahlte Pro- 
gramm von der Diskette und 
startet es. Ladefehler, die in 
dieser Phase auftreten, wer- 
den nicht mehr berucksich- 
tigt: Der Disklader wird vom 
neuen Programm einfach 
uberschrieben. Sonst konn- 
ten wir nur Programme verof- 
fentlichen, die mit der Benut- 
zeroberflache zusammenar- 
beiten. Bei vielen Spielen, 
Tricks oder Tools ist dies aber 
nicht der Fall. 

Fur Sie bedeutet dies, 
nach jedem Starten eines 
Programms den »Disklader« 
erneut zu laden. Wer die Be- 
nutzeroberflache verlassen 
will, gibt < RUN/STOP > ein. 
Sie befinden sich dann im 
normalen »Basic« des C64. 
Fur einen Neustart befehlen 
Sie 

SYS 12032 

und bestatigen mit < RE- 
TURN >. Dieser Neustart 
funktioniert auch nach ei- 
nem Reset, d.h. wenn Sie 
durch den entsprechenden 
Taster einen Hardware-Re- 
set ausgelost haben. Aller- 
dings sollten Sie zwischen- 
zeitlich kein Programm gela- 
den haben, da dies den ver- 
wendeten Speicherbereich 
uberschreiben konnte. La- 
den Sie in diesem Falle den 
Disklader neu. 

Wir haben bei der Pro- 
grammierung groBten Wert 
auf Kompatibilitat mit den un- 
terschiedlichsten Betriebssy- 
stemerweiterungen gelegt. 
Lediglich bei der Gerate- 
konfiguration C128 mit 
RAM-Erweiterung und zwei- 
ter Diskettenstation sollten 
Sie die externe Floppy aus- 
schalten. (gr) 
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ausgedruckt bedeutet die 
Zahl »3.8023895lE-03« das- 
selbe wie »0.0038023895«. 

Ein positives Argument X 
beginnt immer mit demsel- 
ben Anfangswert. 1st X=0, 
nimmt der Computer als An- 
fangszahl den aktuellen 
Stand der inneren Compu- 
teruhr. Bei negativen Argu- 
menten bildet diese Zahl 
selbst den Startwert. Wir 
empfehlen: Verwenden Sie 
fur RND stets 1! RND(O) 
kann namlich nur 256 ver- 
schiedene Zufallswerte er- 
zeugen! Deutlich ist dieser 
Unterschied mit den Bei- 
spielen rnd(O) und rnd(1) 
(Abb. 5 und 6) auf dem Bild- 
schirm zu sehen. 

Andern Sie das Argument 
der RND-Funktion in Zeile 
10 unseres Programmbei- 
spiels auch in andere belie- 
bige positive und negative 
Werte und vergleichen Sie 
die Zahlen, die auf dem Bild- 
schirm auftauchen. 

Kommastellen ab- 
getrennt 

Bisher wurden die Zufalls- 
zahlen als Bruche (mit 
Nachkommastellen) ange- 
zeigt. Nehmen wir an, in ei- 
nem Spielprogramm (Wur- 
feln) sollen Zahlen zwischen 
1 und6erzeugtwerden. Das 
Wurfelergebnis der RND- 
Funktion (z.B. 3.57814324 
oder 4.11720395) wurde die 
Spiellaune bald verder- 
ben... Auch fur diesen Fall 
kennt Basic 2.0 ein Rezept: 
INT-Funktion 
Es ist die Abkurzung von IN- 
TEGER. Daraus erkennen 
Sie, dal3 es sich urn ganze 
Zahlen handeln muB. 
Schreiben Sie den Dezimal- 
bruch (oder dessen Varia- 
blennamen) in Klammern 
hinter die Anweisung: 

print int(4.1172) 

Als Ergebnis erhalten Sie 
»4«. Da der Wert der Nach- 
kommastellen relativ niedrig 
ist, ist man mit diesem Er- 
gebnis einverstanden, aber: 

print int(4. 99999) 

ergibt ebenfalls »4« (obwohl 
die Zahl doch fast den Wert 
»5« besitzt!). Diese groBzCigi- 
ge Berechnung des C64 hat 




[5] Zufall? Die Funktion RND(O) sieht geordnet aus 




[6] Der Beweis: RND(1) erzeugt echte Zufallszahlen 



einen simplen Grund: Er 
macht sich nicht die Muhe, 
auf- oder abzurunden - er 
schneidet die Kommastel- 
len hinter der ganzen Zahl 
einfach ab! 

Die Kommazahl, die mit 
INT bearbeitet werden soil, 
darf auch eine mathemati- 
sche Formel oder ein ande- 
rer, komplizierter Ausdruck 
sein. Voraussetzung: Er 
muB sich berechnen lassen. 
Zwingend erforderlich sind 
die Klammern, in denen die 
Zahl oder der Ausdruck ste- 
hen muB. Wer sie weglaBt, 
wird mit einem »Syntax Er- 
ror" bestraft. In der Praxis 



mit den Zufallszahlen sieht 
es nun so aus: 

10 a=rnd(0) 

20 print int(a) 

30 goto 10 

Das Ergebnis — blamabel! 
Eine Perlenkette von Nullen 
tummelt sich auf dem Bild- 
schirm. Die Erklarung ist 
schnell gefunden: Alle 
RND(0)-Zahlen sind kleiner 
als »1«, also »0« und einige 
»Zerquetschte«. Sind die 
Nachkommastellen elimi- 
niert, bleibt eben nur »0« 
ubrig! Dagegen sollten Sie 
sofort etwas unternehmen: 
Zeile 20 muB so verbessert 
werden, daB der Dezimal- 



Kurzinfo: wurfelzahlen 



Das Programm gibt sechs Zahlen aus, die das Ergebnis von sechsma- 
ligem Wurfeln simulieren sollen. 

Zeile 10: offnet die Schleife W fur sechs Durchgange. 

Zeile 20: belegt die Variable A mit einem zufalligen Wert, der nicht 
groBer als 6 und nicht kleiner als 1 sein darf. 

Zeile 30: Der jeweiligen Werte von A erscheinen sechsmal unterein- 
ander auf dem Bildschirm. 

Mochten Sie nur jeweils eine gewurfelte Zahl erzeugen, genugt die- 
ser Einzeiler: 
10 a=int(rnd(l)#6)+l:print a 



punkt nach rechts verscho- 
ben wird (durch eine Multi- 
plikation von 10, 100, 1000 
usw.): 

20 print int(a*10) 

erzeugt Zufallszahlen zwi- 
schen und 9, 

20 print int(a#100) 

liefert Werte zwischen und 
99. Die letztgenannte Ver- 
sion sahe als Einzeiler so 
aus (Verschachtelung der 
Klammern und ihre exakte 
Position beachten!): 

10 print int(rnd(0)#100) : 
goto 10 

Fehlt eine Klammer, er- 
scheint unerbittlich wieder 
ein »Syntax Error«. Eines 
stort allerdings noch an die- 
ser Programmierung der 
RND-Funktion: Es konnen 
auch Zahlen erscheinen, die 
geringer als »1« sind: Null- 
werte. Unser Beispiel mit 
dem Wiirfelspiel wurde da- 
mit nicht hinhauen: Ein Wur- 
fel kennt schlieBlich nurZah- 
len von 1 bis 6! Die Losung: 
Der INT-Ausdruck muB 
noch mit dem Wert addiert 
werden, der als unterste 
Grenze bei der Ausgabe der 
Zufallszahlen gelten soil: 

5 rem wurfelzahlen 
10 for w=l to 6 
20 a=int(rnd(0)*6)+l 
30 print a 
40 next 

Das Beispielprogramm 
wuerfelzahlen befindet 
sich auf der Diskette. Nach 
dem Start mit RUN gibt der 
Computer sechs Zahlen 
aus, die Sie quasi gewurfelt 
haben. Storen Sie sich nicht 
daran, daB ab und zu glei- 
che Zahlen auftauchen: Das 
kommt beim echten Wurfeln 
oftgenugvor. In Wirklichkeit 
sind die Zahlen aber nicht 
gleich, denn im abgeschnit- 
tenen Nachkommateil wur- 
den wir erhebliche Unter- 
schiede entdecken! 

Eine sehr beliebte An- 
wendung der RND-Funktion 
ist das Erzeugen von Lotto- 
zahlen. Warum sich jede 
Woche den Kopf iiber neue 
Tippzahlen zerbrechen, 
wenn man einen C64 hat? 
Nur: Hier wirkt sich das 
mehrmalige Auftauchen ein 
und derselben Zahl uner- 
freulich aus: Beim Lotto 
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Nachdem Start mit RUN gibt der Computer untereinandereine Lotto- 
zahlenreihe aus, die Sie z.B. fiir Ihren nachsten Tippschein verwen- 
den konnen. Mit der Taste <N> laBt sich eine neue Zahlenkolonne 
aktivieren, <E> beendet das Programm. 

Zeilen 10 bis 20: Bildschirmausgabe der Uberschrift »Mini-Lotto«. 

Zeile 30: Die Schleife I wird geoffnet, sechs Durchgange sind vor- 
gesehen. 

Zeile 31: Sprung zum Unterprogramm in Zeile 90: Dort zieht der 
Computer die sechs Zahlen zunachst intern und speichert sie in den 
indizierten Variablen ZA(1) bis ZA(6). 

Zeile 33: Eine weitere Schleife (J) mit sechs Durchlaufen wird vor- 
bereitet. Grund: Die gezogenen Zahlen sollen nun in umgekehrter 
Reihenfolge (Schleife I, FOR l=6 TO 1 STEP-1) verglichen werden. 

Zeile 34: Stellt der Computer fest, daB zwei gezogene Zahlen iden- 
tisch sind, aktiviert das Programm erneut das Unterprogramm in Zeile 
90. Damit erhalt man nun eine andere Zahl. 

Zeile 35: Zwischen den Schleifenablaufen gibt der Computer die 
Zahlen auf dem Bildschirm aus. 

Zeilen 40 bis 80: ...fragen ab, ob erneut gezogen Oder das Pro- 
gramm beendet werden soil. 



Wie kommt aber der Com- 
puter an diese Daten? Mit 
der 
READ-Anweisung 

Die Ubersetzung ist tref- 
fend: Read heiBt nun mal 
Lesen. Integrieren wir die- 
sen Befehl in unser Beispiel: 

40 read a$ 
50 print a$ 

Nach RUN bringt das Pro- 
gramm das erste Wort: 
Computer. Das ist's aber 
auch schon - die weiteren 
Strings lassen sich damit 
nicht aktivieren. Wer z.B. in 
den Zeilen 40 und 50 die Va- 
riable durch eine numeri- 
sche ersetzt (A), hat eben- 
falls keinen Erfolg und wird 



(Vollsystem) gibt's zwar 
auch sechs Zahlen zwi- 
schen 1 und 49, doch mus- 
sen alle verschieden sein! 
Eine praktikable Losung 
bieten unsere Programm- 
beispiele rnd-lotto und, in 
der komfortableren Version, 
lotto (Abb. 7), aus dem 
1984 erschienenen Buch 
»Das groBe Spielebuch fiir 
den C64« vom Markt & 
Technik-Verlag. 

Datenbanken 

INPUT und GET sind kom- 
fortable Anweisungen, urn 
dem Computer Zahlen, Wor- 
ter oder Text fur ein Pro- 
gramm zu ubermitteln. Auf 
Dauer wird das aber miih- 
sam, vor allem, wenn die 
Daten bereits feststehen, die 
man verarbeiten mochte. 
Einmal eingegeben, sollten 
sieimmerzurVerfugungste- 
hen. 

Seit dem Kapitel iiber Va- 
riablen wissen wir, daB sich 
z.B. Strings unter einem 
markanten Namen im Com- 
puter speichern lassen. Urn 
etwa funf Zeichenketten zu 
definieren, muB man funf 
Zuordnungen aufstellen: 

10 a$= "computer" 
20 b$= "monitor" 
30 c$= "floppy" 
40 d$= "joystick" 
50 e$= "drucker" 

Bei funf Strings kein Pro- 
blem - aber bei 30 Oder 200? 

Basic 2.0 kennt dazu ein 
komfortables Befehlswort: 
DATA-Anweisung 

In einer Befehlszeile las- 
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[7] Lottozahlen per Computer: Ist Gliick berechenbar? 



sen sich Zahlenwerte und 
Strings erfassen. Alle Ein- 
trage mussen durch ein 
Komma getrennt sein. Un- 
sere Listingzeilen sehen 
nun so aus: 

100 data computer, monitor, 
floppy, j oystick , drucker 

Vorteil: Die Strings mus- 
sen nicht in Anfiihrungszei- 
chen stehen. Ausnahme: 
wenn Sie Grafikzeichen, 
Strings mit Kommas Oder 
bei eingestellter Kleinschrift 
GroBbuchstaben verwen- 
den. Beispiel: 

100 data "Computer", 
"Monitor", "eine Floppy, 
die schnell ist! ", 
"Joystick", "Drucker" 

Mit Zahlen sieht eine 
DATA-Zeile so aus: 

200 data 25,123,225,16,24 

Die Daten, die man stan- 
dig benotigt, sind nun in Pro- 
grammzeilen erfaBt und ste- 
hen sofort nach dem Start 
zur Verfugung. Erneute Ein- 
gabe entfallt. 



zusatzlich mit einer Fehler- 
meldung bestraft: Syntax 
Error. 

Wir haben funf Stringwor- 
ter: Der READ-Befehl muB 
also funfmal ausgefuhrt 
werden. Das funktioniert mit 
einer Schleife. Erganzen 
Sie unser Programmbei- 
spiel urn folgende Zeilen: 
30 for 1=1 to 5 
60 next 

Jetzt tauchen alle funf 
Strings auf. Eine Erhohung 
der Schleifenvariablen I auf 
»10« gibt auch noch die funf 
Zahlen in Zeile 200 aus. 
Wollen Sie mehr Strings ein- 
lesen, als in den DATA-Zei- 
len vorhanden sind (Schleife 
I wird z.B. auf »12« erhoht), 
erhalt man die Fehlermel- 
dung: Out of data. Verrin- 
gern laBt sich der Schleifen- 
wert jedoch jederzeit. 

Der Computer hat die 
Zahlen in Zeile 200 zwar ak- 
zeptiert, aber fur ihn sind es 
keine Zahlen, sondern Zei- 



BA* IC 



chenketten. Zu Berechnun- 
gen kann man sie in dieser 
Form nicht einsetzen. Dazu 
muB man eine weitere 
Schleife fur numerische Va- 
riable offnen: 

62 for i=l to 5 

63 read a: print a 

64 next 

Der Unterschied wird auf 
dem Bildschirm sichtbar: Al- 
le Zahlen sind bei der Aus- 
gabe jetzt vom Rand urn ei- 
ne Stelle eingeruckt (das By- 
te furs Vorzeichen!) 

Ein weiteres Experiment 
zur READ-Anweisung: Ver- 
suchen Sie, die Ausgabe der 
DATA-Werte endlos laufen 
zu lassen. Fugen Sie die 
nachste Zeile in unser Pro- 
grammbeispiel ein: 

70 goto 30 

Nach RUN erscheinen 
zwar die Daten, aber auch 
eine Fehlermeldung: Out of 
data. Schuld dran ist die 
Verfahrensweise des 

READ-Befehls: Er laBt einen 
internen Zahler mitlaufen, 
der standig anzeigt, auf wel- 
chen DATA-Wert das Pro- 
gramm jetzt zugreifen soil. 
Nachdem beide Schleifen 
abgearbeitet sind, bleibt der 
Zahler bei seinem erhohten 
Wert und versucht, den 
Wert Nr. 11 zu holen (den 
gibt's aber nicht!). Folgen- 
der Basic-Befehl behebt 
dies: 
RESTORE-Anweisung 

Wortlich ubersetzt bedeu- 
tet es: wiederherstellen, re- 
staurieren. Fugen Sie den 
Befehl vor Zeile 70 ein: 

69 restore 

Wenn Sie unser Pro- 
grammbeispiel jetzt mit 
RUN starten, werden Sie mit 
dem Ergebnis zufrieden 
sein. < RUN/STOP > bricht 
die Endlosschleife jederzeit 
ab. Das Listing finden Sie 
als Programmbeispiel read- 
data auf unserer Diskette. 

Noch ein lustiges Experi- 
ment zeigt, wie man hier die 
RND-Funktion einsetzen 
kann: 

30 for 1=1 to int(rnd(l)#5 

)+l 

40 read a$ 

50 next 

60 print a$ 

100 data sabine,monika,ka- 

rin, 

brigitte,marion 
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Konnen Sie sich nicht ent- 
scheiden, welche der funf 
Damen Sie heute abend an- 
rufen sollen? Dann lassen 
Sie sich mit diesem Pro- 
gramm vom Computer bera- 
ten... 

Da der PRINT-Befehl erst 
nach der Schleife eingesetzt 
wird, bringt er nur den zu- 
letzt gelesenen Namen auf 
den Bildschirm. Der Compu- 
ter trifft eine zufallige Aus- 
wahl (hoffentlich war's die 
richtige!). Auf der Diskette 
heiBt das Programm rnd- 
read. 

Mit dem bisher erworbe- 
nen Wissen nehmen wir un- 
ser erstes groBeres Pro- 
grammprojekt in Angriff. Es 
stammt aus dem Buch 
»Computerspiele und Kno- 
beleien« von Rudiger Bau- 
mann. Folgende Aufgaben 
muB das Programm erful- 
len: 

- Der Computer hat 14 
Sportarten gespeichert. 

- Ein Begriff wird jeweils 
durch den Zufallsgenerator 
ausgewahlt. Der Spieler 
kennt lediglich die Wort- 
lange (angezeigt durch 
Punkte). 

- Der Spieler rat einen Buch- 



staben (erinnert an das 
Gliicksrad in SAT 1). 

- Das Programm vergleicht 
diesen mit alien anderen. 
Ubereinstimmende Zeichen 
werden an der richtigen 
Stelle eingesetzt. 

- Das wiederholt sich so lan- 
ge, bis das Wort vollstandig 
ist. 

- Zum AbschluB gibt der 
Spieler das komplette Wort 
ein. 

Das fertige Programm be- 
findet sich unter dem Na- 
men begriffe raten auf der 
Diskette zu diesem Heft. Be- 
achten Sie die Programmer- 
klarung im Infokasten. 

Masdiinensprache - 
in Basic? 

Der gesamte Speicher des 
C64 ist aus einzelnen Zellen 
aufgebaut, die jeweils Werte 
von bis 255 enthalten kon- 
nen. Der C64 besitzt insge- 
samt 65536 solcher Spei- 
cherstellen, die von bis 
65535 durchnumeriert sind. 
Sie werden haufiger als 
Adressen gezeichnet. Urn 
Werte in Speicherstellen 
einzutragen oder sie auszu- 



iffe raten 
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Der Titelbildschirm gibt die Kurzbeschreibung des Programms aus 
und stellt sofort die Frage nach dem ersten Begriff. Wie lang er ist, 
erkennen Sie an der Punkteanzahl. Hinter der INPUT-Abfrage 
»Was raten Sie?« mussen Sie einen Buchstaben eingeben. Falls er 
im Wort vorkommt, erscheint er in der Punktezeile an richtiqer 
Stelle. 

Zeilen 10 bis 180: Bildschirm loschen und Spielanleitung ange- 
ben. 

Zeilen 240 bis 260: Per RND-Funktion sucht der Computer aus 
den Data-Zeilen die Sportart (U$) aus. 

Zeile 290: miBt die Lange von U$. 

Zeile 300: generiert die Punktekette H$. 

Zeile 370: gibt den Punkte-String auf dem Bildschirm aus. Jetzt 
kennen Sie zumindest die Lange des Suchbegriffs. 

Zeile 390: Die INPUT-Routine fordert Sie auf, das Zeichen L$ 
einzugeben. 

Zeile 400: Haben Sie auf Anhieb das richtige Gesamtwort erra- 
ten, springt das Programm zu Zeile 600. 

Zeile 410: Wenn Sie mehr als einen Buchstaben eintippen, wird 
die Frage wiederholt. 

Zeilen 480 bis 530: bilden eine Zahlschleife in der Lange des 
vorgegebenen Begriffs U$. In Zeile 490 holt das Programm die ein- 
zelnen Buchstaben per MID$-Befehl aus U$ heraus, Zeile 500 
macht das gleiche mit H$. Das Programm vergleicht den geratenen 
Buchstaben L$ mit jedem einzelnen (B$) des Worts U$. Ist er iden- 
tisch, wird ein neues Hilfswort aus dem richtig geratenen Buchsta- 
ben L$ gebildet. War der Ratebuchstabe falsch, ubernimmt das 
Programm aus dem Hilfswort H$ einen Punkt in N$. Das geschieht 
fur alle entsprechenden Stellen der gleich langen Worter US und 
H$. 

Zeile 540: ordnet das neue Hilfswort N$ der Zeichenkette H$ zu, 
die dem Spieler beim nachsten Ratedurchgang gezeigt wird. 

Zeilen 600 bis 670: Dieser Programmteil fragt, ob Sie das Spiel 
wiederholen oder beenden mochten. 

Zeilen 730 bis 760: speichern die Begriffe der Sportarten als 
String-Datas. 
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[8] Die Speicherbelegung des C64 auf einen Blick 



lesen, ist es notwendig, sich 
halbwegs in diesem AdreB- 
buch (Memory Map) des 
C 64 auszukennen (Abb.8): 

- Der Speicher beginnt bei 
Adresse 0. 

- Den Bereich der ersten 
256 Byte nennt man Zeropa- 
ge (Nullseite). Diese Adres- 
sen braucht der Computer 
bis auf ganz wenige Aus- 
nahmen selbst. 

- Von Adresse 256 bis 511 
liegt der Stack (Stapelspei- 
cher), den der C 64 ebenfalls 
alleine verwalten will. 

- Der Basic-Eingabepuffer 
beginnt bei Speicherzelle 
512 und endet bei Adresse 
600. 

- Ab Speicherstelle 601 bis 
1023 liegen wichtige Adres- 
sen (z.B die Betriebssystem- 
vektoren ab 768), die dem 
C64 wahrend seiner Arbeit 
wichtige Werte ubermitteln 
oder interne Berechnungs- 
ergebnisse zwischenspei- 
chern. Ausnahmen sind die 
Bereiche 704 bis 767 (zur 
freien Verfugung, z.B. Spri- 
teblock 11) und 828 bis 1019 
(Kassettenpuffer). 

- Der Bildschirmspeicher 
umfaBt 1000 Adressen und 
liegt im Bereich von 1024 bis 
2023. 

- Die Speicherzellen 2040 
bis 2047 sind fur die Sprite- 
Zeiger reserviert. 

- Endlich: Adresse 2048. 
Hier beginnt der RAM-Spei- 
cher (Random Access Me- 
mory: In diese Adressen 
kann man beliebige Werte 
zwischen und 255 eintra- 
gen) fur Basic-Programme. 
Auch Variablen, Arrays und 
Zeichenketten sind dort un- 
tergebracht. 

- Das Basic-RAM endet mit 
Adresse 40959. Dem Pro- 



grammierer stehen 38911 
Basic-Byte zur freien Verfu- 
gung. 

- Der Bereich von 40960 bis 
49151 ist ROM (Read Only 
Memory: Speicher, der sich 
nur lesen, aber nicht be- 
schreiben laBt) gehort dem 
Basic-Interpreter. 

- Die Adressen 49152 bis 
53247 bilden ebenfalls ei- 
nen freien RAM-Bereich, 
der sich aber von Basic nicht 
nutzen laBt: Man kann keine 
Programmzeilen hinein- 
schreiben. Hier werden mit 
Vorliebe Maschinenspra- 
cheprogramme abgelegt. 

- Ab 53248 gehort im ROM 
alles dem Betriebssystem: 
Manche Bereiche sind so- 
gar mehrfach belegt: VIC- 
Chip, Ein- und Ausgaberou- 
tinen, Zeichensatz und Flop- 
pyoperationen. Auf welche 
Konfiguration sie zugreifen, 
regelt der Inhalt in Adresse 1 
(Zeropage). 

Ein tieferer Einstieg in die 
Speicherbelegung des C64 
gehort aber nicht in einen 
Basic-, sondern in einen As- 
sembler-Kurs. Uns interes- 
siert nur, wie wir Daten in ge- 
wunschte Speicherzellen 
schreiben, deren Inhalt dar- 
aus lesen und bereits vor- 
handene Systemroutinen 
oder Maschinensprache- 
programme aktivieren kon- 
nen. 

Basic besitzt zur Manipu- 
lation des Speichers zwei 
Befehle: POKE (Schreiben) 
und PEEK (Lesen). Wah- 
rend der Lesebefehl vollig 
ungefahrlich ist - er kopiert 
quasi den Inhalt der Spei- 
cherzelle und laBt das Origi- 
nal unverandert - kann der 
Schreibbefehl POKE ge- 
fahrlich sein: Er verandert 
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den Inhalt einer Speicher- 
zelle. Man sollte sich vorher 
uber die Folgen klar sein. 
POKEn Sie eine Zahl in Be- 
reichsadressen, mit denen 
der C64 seine eigenen Ab- 
laufe steuert (sehr kritisch: 
die Zeropage!), kann's zum 
Absturz kommen: Es lauft 
nichts mehr, unter Umstan- 
den versagt sogar die Ta- 
stenkombination 

< RUN/STOP RESTORE >. 
Kaputt machen Sie aller- 
dings nichts damit - das 
Schlimmste, was passieren 
kann, ist, daB Sie ein- und 
ausschalten mussen. Das 
Programm im Speicher ist 
dann allerdings futsch. Wir 
empfehlen: Bevor Sie einen 
kritischen POKE-Befehl ein- 
geben Oder ausprobieren 
mochten, sichern Sie vorher 
Ihr Programm! 
POKE-Befehl 

Damit konnen Sie beliebi- 
ge Werte zwischen und 
255 in einer Speicherstelle 
unterbringen. Jede hohere 
Zahl bringt die Fehlermel- 
dung: Illegal Quantity. Nach 
dem Befehlswort muB die 
Adresse und - durch ein 
Komma getrennt - der Wert 
stehen. Beispiel: Die Spei- 
cherzelle 646 informiert den 
Computer standig uber die 
aktuelle Farbe der Schrift- 
zeichen: 

POKE 646,1 

farbt die folgenden Zeichen 
weiB (Farbcode »1«). Der 
POKE-Wert laBt sich auch in 
einer Variablen ablegen: 

F=l: POKE 646, F 

Unter der Rubrik »Tips & 
Tricks« in unseren Sonder- 
heften haben Sie sicher 
schon viele POKE-Adres- 
sen gefunden, mit denen 
man verbluffende Effekte 
erzielen kann. POKEn wir 
ruhig ein biBchen weiter: 

POKE 199,1: PRINT "TEST" 

bringt das Wort »Test« in re- 
versen Buchstaben, 

POKE 650,128 

erlaubt eine Wiederholfunk- 
tion aller Tasten, 

POKE 649,0 

Nach dieser Eingabe 
nimmt der C64 keine Ein- 
gabe mehr an: Nur noch 

< RUN/STOP RESTORE > 
hilft! 



POKE 53281,0: POKE 53280,7 

gestaltetden Bildschirmrah- 
men gelb und den Hinter- 
grund schwarz. 

Uber diese beiden Adres- 
sen laBt sich z.B. uberpru- 
fen, ob tatsachlich alle 256 
moglichen Werte (von bis 
255) darin stehen diirfen: 

10 for 1=0 to 255 

20 poke 53281, i 

30 print 1 

40 get a$: if a$="" then 40 

50 next i 

Mit diesem Programm 
farbwechsel (auf Diskette) 
leiern Sie per Tastendruck 
(am besten < SPACE >) al- 
le Farben durch. Auf dem 
Bildschirm erscheint die ak- 
tuelle Codenummer. Dabei 
fallt auf, daB die Farben 
nach jeweils 16 Durchgan- 
gen wiederholt werden: 
Farbcode (schwarz) ist al- 
so identisch mit 16, 32, 48 
usw. Wenn Sie den Finger 
auf der Leertaste lassen, 
geht's mit dem Programm- 
durchlauf schneller. Wie 
man die RND-Funktion ein- 
setzt, zeigt das Programm 
rnd-farben: In rascher Fol- 
ge nehmen Hintergrund und 
Rahmen gleichzeitig eine 
der 16 moglichen Farben 
an. Das Programm ist kin- 
derleicht zu verstehen. 
PEEK-Anweisung 

Verwenden Sie diesen 
Befehl, wenn Sie in eine 
Speicherstelle hineinschau- 
en mochten: 

PRINT PEEK (646) 

gibt - allerdings nur mit Hilfe 
der PRINT-Anweisung - den 
aktuellen Inhalt von Adresse 
646 auf dem Bildschirm aus. 
Der PEEK-Wert kann eben- 
falls als numerische Varia- 
ble definiert sein: 

IN=PEEK(40960): PRINT IN 

In Verbindung mit einer 
Schleife lassen sich damit 
auch ganze Speicherberei- 
che auslesen und deren In- 
halte auf den Bildschirm 
bringen. Laden Sie z.B. un- 
ser kleines Programm rnd- 
farben. Beginn und Ende 
des Basic-Programms sind 
als Low-/High-Byte in den 
Adressen 43, 44 ( = Anfang, 
normalerweise immer 

»2049«) und 45, 46 ( = Ende) 
gespeichert. Erledigen Sie 
folgende Eingaben im Di- 



rektmodus (die FOR-NEXT- 
Schleife muB in einer Zeile 
stehen): 

BE=2049 

EN=PEEK(45)+256*PEEK(46)-1 
FOR I=BE TO EN: 
PRINTPEEK(I);: NEXT 

Der Bildschirm fullt sich 
mit einer Menge Zahlen: Die 
Speicherstellen des Basic- 
Programms haben ihren In- 
halt offenbart. So liest sie 
auch der Computer. Die drei 
Nullen am SchluB weisen 
daraufhin, daB das Basic- 
Programm durchlaufen ist. 
Dieses Prinzip verfolgen die 
meisten »Data-Maker«-Pro- 
gramme, die aus bestimm- 
ten Speicherbereichen per 
PEEK Inhalte auslesen 
(uberwiegend aus Maschi- 

nenspracheprogammen) 
und sie durch geschickte 
Programmierung in - fur Ba- 
sic lesbare - DATA-Zeilen 
umwandeln. Das Basic-Pro- 
gramm erhalt als Kopfzeile 
eine FOR-NEXT-Schleife, 
die nach dem Laden die Da- 
tas liest (per READ) und mit 
POKE in die gewunschten 
Speicherbereiche bringt. 
Diese Art, Maschinenpro- 
gramme an ihren ange- 
stammten Platz zu schie- 
ben, nennt man Basic- Oder 
DATA-Lader. Beispiel: das 
Utilty goto x auf der Diskette 
zum Sonderheft. 

Bildschirm- und 
Farb-RAM 

Die Wirkung eines POKEs 
laBt sich nirgends so ein- 
drucksvoll demonstrieren 
wie im Bildschirmspeicher 
(1024 bis 2023). Kleines Ex- 
periment gefallig? 

- Ldschen Sie mit < SHIFT 
CLR/HOME> den Bild- 
schirm, 

- Bringen Sie den Cursor an 
den unteren Bildschirm- 
rand, 

- Geben Sie ein: 

POKE 1024,42 

In der linken oberen Ecke 
ist plotzlich ein Sternchen 
aufgetaucht. Machen Sie 
aus »42« die Zahl »43«, er- 
scheint das Plus-Zeichen. 
Andern Sie die AdreBanga- 
be 1024 in einen beliebigen 
Wert bis maximal 2023: An 
entsprechender Stelle auf 



BAM 



dem Bildschirm erscheint 
das Zeichen, das mit der Co- 
dezahl hinter dem Komma 
eingestellt wurde. Eine 
Ubersicht der Bildschirmco- 
desfinden Sie im Handbuch 
zum C64. Die Bildschirm- 
POKEs sind eine Alternative 
zum PRINT-Befehl: 

10 for 1=0 to 4 

20 read a 

30 pokel024 + i,a 

40 next 

100 data 8,1,12,12,15 

macht das gleiche wie: 

10 printchr$( 147) "hallo" 

Beim direkten POKEn in 
den Bildschirm entfallen 
Cursor-Steuerzeichen: Das 
Zeichen wird immer in die 
durch die POKE-Adresse 
bestimmte Position ge- 
bracht. Man kann damit Ef- 
fekte erzielen, die durch den 
PRINT-Befehl nur sehr um- 
standlich zu realisieren sind. 
Unser Beispiel soil eine be- 
wegte, farbige Bildschirm- 
umrandung erzeugen. Dazu 
gehen wir Schritt fur Schritt 
vor: 

10 for 1=0 to 999 
20 poke 1024+i,42 
30 next 

Alle 1000 Speicherstellen 
des Bildschirm-RAM wer- 
den per Schleife mit einem 
Stern besetzt. Es fallt auf, 
daB die READY-Meldung 
und der Cursor nicht hinter 
dem letzten Stern (Adresse 
2023) erscheinen, sondern 
weiter oben: dort, wo der 
letzte Basic-Befehl (RUN) 
auf den Bildschirm ge- 
schrieben wurde. Im nach- 
sten Schritt sollen die Ster- 
ne nur auf der obersten und 
untersten Zeile erscheinen. 
Unsere Schleife zahlt jetzt 
lediglich bis 39: 

10 for 1=0 to 39 

20 poke 1024+i,42 

30 poke 1024+960+i,42 

40 next i 

Neu ist Zeile 30: Sie er- 
hbht die POKE-Adresse urn 
24 x 40 = 960 Platze. Das 
entspricht der untersten 
Bildschirmzeile. 

Nun fehlen uns noch der 
linke und rechte Rand: 

50 for k=0 to 960 step 40 
60 poke 1024+k,42 
70 poke 1024+39+k,42 
80 next k 
90 goto 10 
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Um von oben nach unten 
zu zahlen, beginnen wir mit 
»0«, gehen aber in 40er- 
Schritten immer an den An- 
fang der nachsten Bild- 
schirmzeile: Damit wird der 
linke Rand erzeugt. Zeile 70 
benutzt fur den rechten 
Rand die gleiche Art des 
Zahlens, POKEt aber den 
Stern um 39 Platze verscho- 
ben: die auBerste, rechte 
Spalte. Zeile 90 erzeugt eine 
Endlosschleife, um das la- 
stige READY zu verhindern. 

Nun schutten wir Farbe 
druber: Nachjedem Umlauf 
soil die Umrandung in einer 
anderen Farbe erscheinen. 
Dazu bemuhen wir das fur 
den Bildschirmspeicher im 
Textmodus zustandige 
Farb-RAM (im Bereich von 



bige Speicherbereiche mit 
Werten ausstatten, die in 
DATA-Zeilen abgelegt sind. 
Ausnahme: Der Bereich im 
Basic-RAM, den der DATA- 
Lader selbst beansprucht. 
Am bekanntesten sind die 
POKEs in Speicherberei- 
che, in denen sich mit Vorlie- 
be Maschinensprachepro- 
gramme tummeln: die 
Adressen 49152 bis 53247 
und im Kassettenpuffer (828 
bis 1019). Assembler-Datei- 
en lassen sich allerdings 
nicht mit RUN starten. Dazu 
benotigt man einen speziel- 
len Basic-Befehl: 
SYS-Anweisung 

Dahinter muB die Ein- 
sprungadresse stehen (das 
erste Byte, das die Maschi- 
nenroutine aufruft). Wichtig 



Kurzinfo: farbrand 



Nach dem Start mit RUN versieht der Computer den Bildschirm- 
rand mit Sternen, die bei jedem Umlauf die Farbe wechseln. 

Zeilen 5 und 90: bilden die ubergeordnete Schleife F. Dadurch 
kommen die Farbwerte ins Farb-RAM. 

Zeilen 10 und 40: offnen und reguiieren die innere Schleife I. 

Zeile 20: schreibt das Sternchen an die durch den Zahler I defi- 
nierte Bildschirmposition (erste Zeile). Die dazugehorige Farbspei- 
cherstelle wird mit dem aktuellen Wert F belegt. 

Zeile 30: wie Zeile 20, nur gilt das jetzt fur die unterste Bild- 
schirmzeile. 

Zeilen 50 bis 80: kummern sich in einer weiteren Schleife K um 
den linken und rechten Bildschirmrand. 



55296 bis 56295). Es sind 
ebenfalls 1000 Speicher- 
stellen: Jede Adresse des 
Farb-RAM korrespondiert 
mit der entsprechenden des 
Bildschirms: 

Adresse Bildschirm-RAM 
= Adresse Farb-RAM - 
54272 

Das Ergebnis unserer ge- 
meinsamen Anstrengungen 
sehen Sie in der Datei farb- 
rand auf der Diskette zum 
Sonderheft. Die entspre- 
chende Beschreibung steht 
im Infokasten. 

Das Programm farbum- 
lauf ist eine Variante von 
farbrand: Die Umrandung 
soil nicht oben und unten 
bzw. links und rechts gleich- 
zeitig verlaufen, sondern im 
Kreis! Das erreichen Sie, in- 
dem Sie fur jede POKE-Zei- 
le eine eigene Schleife auf- 
machen: in den Zeilen 30 
und 60 wird mit negativem 
STEP sogar ruckwarts ge- 
zahlt. 

Mit dem POKE-Befehl 
und einer Schleife lassen 
sich bei Basic-Ladern belie- 



ist, daB am Ende der mit SYS 
gestarteten Routine ein 
RTS-Befehl steht (Code $60 
hex., 96 dez.). Dadurch 
kehrt man aus der Maschi- 
nenroutine wieder in den 
ubergeordneten Basic-Inter- 
preter zuruck (der ja auch 
nichts anderes ist als ein gro- 
Bes Maschinenprogramml). 
Selbstverstandlich kann 
man Teile daraus (Unterpro- 
gramme) ebenfalls mit einer 
SYS-Anweisung aufrufen 
und im eigenen Basic- 
Programm verwenden. Es 
ist erstaunlich, wie viele in- 
teressante Routinen bereits 
im Betriebssystem enthalten 
sind, die sich per SYS initiali- 
sieren lassen: Oft machen 
sich Basic-Programmierer 
unnotig die Muhe, densel- 
ben Effekt durch umstandli- 
che Basic-Programmierung 
zu erzeugen. Beispiele 
gibt's genug: 

1. In derobersten und un- 
tersten Bildschirmzeile soil 
Text ausgegeben werden. 
Die Mehrzahl der Basic- 
Programmierer arbeitet hier 



mit dem inversen <s> = 
Taste <HOME> und 24 re- 
versen Steuerzeichen <q> 
= Taste <CRSR abwarts 
> . Ganz zu schweigen da- 
von, daB unter zu haufiger 
Verwendung inverser Steu- 
erzeichen die Ubersichtlich- 
keit eines Programmlistings 
leidet. Einfacher geht's mit 
zwei POKEs und einem 
SYS-Befehl: 

POKE 21-4, Zeile 
POKE 211, Spalte 
SYS 58640 

Einen Kaltstart des Com- 
puters (Ausgangslage nach 
dem Einschalten) erzielen 
Sie mit diesen Anweisun- 
gen: 

SYS 58260 

oder 

SYS 64738 

War ein Basic-Programm 
im Speicher, ist es jetzt na- 
turlich geloscht! 

Die LOAD-Routine z.B. 
laBt sich mit 

SYS 62622 

allerdings nicht starten. Es 
fehlen die notigen Parame- 
ter: logische Filenummer, 



namen und keine Gerate- 
adresse findet, nimmt er an, 
Sie mdchten von Datasette 
laden. Das geschieht auch, 
wenn Sie »SYS 57704« ein- 
geben: Dort beginnt die Be- 
triebssystemroutine LOAD 
im Basic-Interpreter. Alle Pa- 
rameter, die nicht die Data- 
sette als Ladegerat kenn- 
zeichnen, mussen Sie von 
Hand eingeben. Dazu be- 
sitzt der Computer vier wich- 
tige Speicherstellen, die je- 
dem Assembler-Program- 
mierer gelaufig sind (ohne 
diese Register ware er auf- 
geschmissen!): 
Akkumulator (A): 780, 
X-Register(X):781, 
Y-Register (Y): 782 und 
P-Register (P): 783. 

Das P-Register, haufiger 
als Statusregister des Pro- 
zessors bezeichnet, ist nicht 
so einfach zu handhaben 
wie die anderen. Es besitzt 
bei alien 8 Bit lediglich eine 
Schalterfunktion: Bitan = 1, 
Bit aus = 0. Jedes Bit des 
Status-Bytes kummert sich 
um einen bestimmten Com- 
puterzustand (Tabelle 3). Ist 
eines der Bits eingeschaltet 
(= 1), heiBt es fur den Com- 



Tabelle 3. Prozessorstatusregister 783 (Funktionen) 



Bit 


Wert 


wenn Bit = 1 


Abkiirzung 







1 


Ubertrag 


C(arry) 




1 


2 


Null 


Z(ero) 




2 


4 


Unterbrechung 


(l)nterrupt 




3 


8 


Dezimal 


D 




4 


16 


Abbruch 


B(reak) 




5 


32 


unbenutzt 






6 


64 


Uberlauf 


0(V)erflow 




7 


128 


Vorzeichen 


N(egativ) 





Gerate- und Sekundar- 
adresse, Filename, An- 
fangs- und Endadresse 
usw. Die Angaben sucht 
sich der Basic-Interpreter 
nach der Eingabe von LOAD 
selbst in den entsprechen- 
den Speicherstellen und 
den von Ihnen ubergebenen 
Parametern zusammen. 
Beispiel: 

LOAD "TEST", 8 

teilt dem Computer mit, 
daB er die Datei mit dem Na- 
men »Test« vom Gerat mit 
der Nr. 8 (Floppy) laden soil. 

Tippen Sie namlich nur 
»LOAD«, erscheint die Mel- 
dung: 

PRESS PLAY ON TAPE 

Da der C64 keinen Datei- 



puter - bildlich gesehen - ei- 
ne Flagge (Flag). Assem- 
bler-Program mierer... mus- 
sen die Flaggen stets im Au- 
ge behalten, fur Basic- 
Programmierer hat das Byte 
783 so gut wie keine Bedeu- 
tung. 

Die Routine PLOT 
($FFF0, 65520) im Betriebs- 
system beispielsweise be- 
nutzt zwei der genannten 
Register, um den Cursor be- 
liebig auf dem Bildschirm zu 
positionieren: das X- und Y- 
Register. Die bereits er- 
wahnte Anweisung zur Cur- 
sorpositionierung konnte 
auch so lauten: 

POKE 781, Zeile 
POKE 782, Spalte 
SYS 65520 
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BASte 



.Hill: 



Systemroutinen 
nutzen 



Weitere SYS-Anweisun- 
gen, die Betriebssystemrou- 
tinen aktivieren: 
SYS 58692: loscht den Bild- 
schirm, 

SYS 58726: bringt den Cur- 
sor in die < HOME > -Posi- 
tion (linke obere Bildschirm- 
ecke), 

SYS 59903: loscht eine Zeile 
auf dem Bildschirm. Im X- 
Register (781) muB aller- 
dings die Zeilennummer ste- 
hen. Dazu ein Programm- 
beispiel: 

10 sys 58692 

20 for 1=1 to 22 

30 prinfdas 1st ein text." 

40 next 

50 for zl=0 to 22step2 

60 poke 783, peek ( 783 )and254 

70 poke 781, zl: sys 59903 

80 next 

Nach dem Start mit RUN 
gibt der Computer 22 Bild- 
schirmzeilen mit Text aus, 
anschlieBend wird durch die 
Zeilen 50 bis 70 jede zweite 
Textzeile geloscht. Erwah- 
nenswert: Vor jedem Aufruf 
der PLOT-Routine 65520 
muB das Carry-Flag ge- 
loscht sein (Bit Nr. in 
Adresse 783). Dies erledigt 
die logische UND-Verknup- 
fung in Zeile 60. Ein weiteres 
Programmbeispiel, das fast 
alle bisher erwahnten SYS- 
Befehle vereint, finden Sie 
auf der Diskette unter zei- 
lenkiller. 

Auch die interne Zeit des 
C64 laBt sich mit einer SYS- 
Anweisung auslesen: 65502 
- zumindest in Veotel-Sekun- 
den (wie die Systemvariable 
Tl). Nachdem die Betriebs- 
systemroutine ihre Arbeit 
getan hat, haben sich drei 
Speicherstellen verandert: 
780, 781 und 782. Sie miis- 
sen lediglich passend zu- 
sammengefugt werden, urn 
die richtige Zeit zu erhalten: 

PRINT PEEK (780) + 
PEEK (781) * 256 + 
PEEK (782) 

Das Ergebnis ist bis auf ei- 
ne kleine Abweichung iden- 
tisch mit dem aktuellen Wert 
von Tl. Den Zeitunterschied 
verbraucht der Basic-Inter- 
preter, urn Ihre Eingaben zu 
iibersetzen, auszufuhren 



und auf den Bildschirm zu 
bringen: deutlich zu sehen 
in unserem Beispielpro- 
gramm sys-zeit auf der Dis- 
kette zum Sonderheft. Ach- 
tung: Ubersteigt der Inhalt 
von 781 den Wert »255«, wird 
er automatisch wieder auf 
»0« gesetzt. 

Der nachste Befehl ist das 
Mauerblumchen unter den 
Befehlen des Basic 2.0, ob- 
wohl er mehr kann als SYS: 
USR-Befehl 

In der Funktionsweise ist 
diese Anweisung mit SYS 
identisch: Sie muB eine Rou- 
tine in Maschinensprache 
aus einem Basic-Programm 
aufrufen. Aber die Befehls- 
syntax unterscheidet sich 
erheblich: Steht bei SYS die 
Einsprungadresse unmittel- 
bar hinter dem Befehl, muB 
man diese bei USR zu- 
nachst in Low- und High-By- 
te splitten und in die Adres- 
sen 785/786 POKEn. Ein 
Beispiel: 



im Programmverlauf auch 
berechnen lassen darf. Das 
Argument Y kommt in die 
Speicherzellen 97 bis 102 
im Gleitpunktakkumulator 
FAC 1 . Als FlieBkommazahl 
wird es nun vom aktivierten 
Maschinenprogramm wei- 
terverarbeitet. Das Resultat 
kehrt zuriick in FAC 1 und 
steht dann als Wert X zur 
Verfugung. Y kann auch ein 
komplexer Ausdruck sein, 
z.B.: 

X = USR(PEEK(A)+256*PEEK(B- 
)) 

Experimentieren wir mit 
diesem Befehl: Wir mochten 
eine Rechenroutine im Be- 
triebssystem des C 64 aufru- 
fen, die fur die INT-Funktion 
zustandig ist: 48332. Zuerst 
weisen wir der Variablen Y 
eine Realzahl zu: 

10 y = 365.57 

Jetzt POKEn wir Low- und 
High-Byte von 48332 in die 
Adressen 785 und 786: 
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Mit der Eingabe von RUN bringt der Bildschirm 22 Textzeilen. 
Nach 1 Sekunde werden die Zeilen 7 bis 15 geloscht, nach einer 
weiteren Sekunde dort wieder eingefugt. Das Programm befindet 
sich in einer Endlosschleife und laBt sich mit < RUN/STOP > ab- 
brechen. 

Zeile 10: loscht den Bildschirm (ersetzt das inverse Zeichen von 
< SHIFT CLR/HOME> bzw. CHR$(147). 

Zeilen 20 bis 40: In der Schleife I wird 22mal das Unterpro- 
gramm in Zeile 1000 angesprungen (Ausgabe der Textzeile). 

Zeile 45: Aufruf des Unterprogramm-Einzeilers »Warte ca. 1 s« in 
Zeile 1100! 

Zeilen 50 bis 70: Der jeweilige Variablenwert ZL wird in Spei- 
cherstelle 781 (x-Reg.) gePOKEt und die Loschroutine aktiviert. 

Zeilen 80 bis 110: Die leeren Bildschirmzeilen 7 bis 15 sollen 
wieder gefiillt werden: Zuerst muB man sicherheitshalber in Adres- 
se 783 (Statusregister) das Carry-Bit loschen. In Speicherstelle 781 
kommt die aktuelle Zeile, in 782 (y-Reg.) die aktuelle Spalte (ist im- 
mer »0« = Zeilenanfang). Mit dem anschlieSenden SYS-Befehl ak- 
tiviert man die PLOT-Routine und schreibt den Text wieder in die 
Liicke auf dem Bildschirm. 

Zeilen 120 bis 130: bringt den Cursor in HOME-Position, der 
nachste Durchgang beginnt... 



Sprung zu Adresse 64738 
(Kaltstart/Reset) 

10 POKE 785,64738 - 256 * 

INT(64738/256) 
20 POKE 786,INT(64738/256) 
30 PRINT USR(0) 

Das kurze Beispiel ist 
ebenfalls auf der Diskette 
zum Sonderheft: usr(0). 

Der Vorteil von USR: Der 
Befehl selbst ist eine nume- 
rische Variable und laBt sich 
in jede andere umbenennen 
(z.B. X, A, B usw). Statt »0« 
kann ebenfalls eine nume- 
rische Variable (z.B Y) in 
Klammern stehen, die man 



Low-Byte von 48332 = 
48332 - 256 * INT 
(48332/256) = 204 
High-Byte von 48332 = 
INT(48332/256) = 188. 
20 poke 785,204 
30 poke 786,188 

Fehlt nur noch der USR- 
Befehl und die Ausgabe des 
Resultats: 

40 x = usr(y) 
50 print x 

Tippen Sie das kurze Pro- 
gramm ab und starten Sie 
es mit RUN. Als Ergebnis er- 
halten Sie die Integerzahl 
»365«. 



Ist Ihnen aufgefallen, daB 
wir in unserer Serie der 
780er Speicherstellen (Ak- 
kumulator, x-, y- und P- 
Register, USR-Adressen) 
die Adresse 784 uberhaupt 
noch nicht erwahnt haben? 
Sie besitzt den Wert »76« 
($4C hex.), das ist der Code 
fur den Assembler-Befehl 
JMP. Wird die USR-Anwei- 
sung ausgefuhrt, springt der 
Computer automatisch zu 
dieser Speicherstelle und 
holt sich aus den folgenden 
beiden Bytes 785/786 die 
Adresse, wohin er springen 
soil: Die Ahnlichkeit mit der 
SYS-Anweisung ist nicht zu 
ubersehen. Besonders, 
wenn in Ihren Basic-Pro- 
grammen extrem schnelle 
Unterroutinen in Maschi- 
nensprache eingebaut sind 
(z.B. Joystick-Abfragen), laBt 
sich USR elegant anwen- 
den. Denken Sie daran, daB 
man damit Variablenwerte 
aus Maschinensprachepro- 
grammen an Basic weiter- 
geben kann! 

Der goldene 
Mittelweg 

Basic und Assembler sind 
zwei Paar Stiefel: trotzdem 
konnen sich beide Sprachen 
ideal erganzen, wenn Sie 
nicht nur selbstentwickelte 
Maschinenroutinen mit 
Basic-Programmen verwen- 
den, sondern die bereits vor- 
handenen Assembler-Routi- 
nen im Betriebssystem 
schamlos ausnutzen. Einige 
dieser Unterprogramme, die 
per SYS Oder USR(X) initiali- 
siert werden, haben wir be- 
reits kennengelernt. 

Eine Aufgabe, die der 
Computer haufig zu erfullen 
hat, ist das Verschieben von 
Speicherbereichen. Moch- 
ten Sie z.B. den Originalzei- 
chensatz des C64 andern, 
mussen Sie ihn vom ROM 
ins RAM kopieren. Dort kon- 
nen Sie aus den Zeichen 
z.B. Pflastersteine machen 
oder deutsche Umlaute und 
Sonderzeichen fabrizieren. 
Ein weiteres Beispiel ist das 
Kopieren des Basic- oder 
Betriebssystem-ROM ins 
darunterliegende RAM, urn 
dort irgendwelche Maschi- 
nenspracheroutinen oder 
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Texttabellen zu verandern 
(z.B. Fehlermeldungen ein- 
deutschen). Dies geht in Ba- 
sic problemlos, z.B. kopie- 
ren Sie so das Basic-ROM 
ins RAM: 

10 for i=40960 to 49151: 
pokei,peek(i) : next 

Da die Ausftihrung dieser 
Basic-Zeile bei 8192 Byte 
unertraglich lange dauert 
(35 s), greifen wir - ebenfalls 
von Basic aus - auf eine 
Routine zuruck, die uns der 
Interpreter zur Verfijgung 
stellt: Die erledigt das in Se- 
kundenschnelle! Sie liegt 
bei $A3BF (41919) und ver- 
langt als Low- und Highbyte 
in den Speicherstellen 
95/96 die Startadresse des 
Bereichs, der ubertragen 
werden soil. In den Spei- 
cherzellen 90/91 muB dage- 
gen die Endadresse + 1 
stehen und in den Zellen 
88/89 befindet sich das En- 
de des neuen Bereichs, 
ebenfalls um »1« erhoht. 
Wem's zu kompliziert wird, 
der sollte das Beispielpro- 
gramm blockmove von un- 
serer Diskette laden und die 
Zahlen eingeben, die im 
Basic-Einzeiler stehen: 

- Alte Startadresse: 40960 

- Alte Endadresse + 1: 
49152 

- Neue Endadresse + 1: 
49152 

Gerade Maschinenspra- 
cheprogramme werden oft 
mit der Endung »,8,1« gela- 
den. Das bedeutet, daB der 
Computer die vor der eigent- 
lichen Programmdatei auf 
Diskette gespeicherte Lade- 
adresse verwendet. Diese 
Startadresse wird beim SA- 
VEn bereits auf Diskette ab- 
gelegt, bei Basic-Program- 
men lautet sie immer: 2049. 
Solche »absoluten« Dateien 
mussen nicht immer Pro- 
gramme sein: Jeder belie- 
bige Speicherbereich des 
C64 laBt sich auf Diskette 
auslagem - man muB nur 
wissen, wie. Mit SAVE? Die- 
ser Befehl funktioniert ledig- 
lich bei Basic-Programmen 
im Basic-RAM. Sie konnen 
damit z.B. kein Maschinen- 
sprache-Utility speichern, 
das sich ab 49152 ($C000) 
im Computer befindet. Dafur 
ist wieder eine Betriebssy- 
stemroutine mit den ent- 
sprechenden Parametern 



zustandig: Sie liegt im ROM 
bei Adresse $F5ED (62957). 
Allerdings bleiben uns als 
Basic-Programmierer auch 
hier gewisse Vorbereitun- 
gen nicht erspart, die auch 
ein Assembler-Freak treffen 
muB: Mit SYS (57812) ruft 
man eine Routine auf, die 
bestimmte Parameter fur 
LOAD Oder SAVE aus dem 
Basic-Text liest. Es darf kein 
Komma folgen! Unmittelbar 
dahinter schlieBt sich der Fi- 
lename an (im Klartext mit 
Anfiihrungszeichen Oder als 
Stringvariable). Jetzt muB al- 
lerdings ein Komma gesetzt 
werden, denn nun kommt 
die Gerateadresse (8). Die 
Start- und Endadresse wird 
per INPUT-Abfrage in den 
numerischen Variablen S 
und E gespeichert. Nach 
Zerlegung in Low- und High- 
Byte kommt die Startzahl in 
die Adressen 193/194, das 
Ende in die Speicherstellen 
174/175. Der abschlieBende 
SYS-Befehl 62957 aktiviert 
die Speicherroutine und legt 
den angegebenen Bereich - 
Bit fur Bit - auf einer Diskette 
ab. Das kann z.B. ein Text- 
bildschirm sein: 

- Anfangsadresse: 1024 

- Endadresse + 1: 2024 
Oder eine Hires-Grafik: 

- Anfangsadresse: 8192 

- Endadresse + 1: 16384 
Oder Sprite-Daten (z.B. in 
Block 11): 

- Anfangsadresse: 704 

- Endadresse + 1: 768 
Diese Liste konnte man 

beliebig fortsetzen: Das kur- 
ze Utility sys-save speichert 
wirklich jeden Bereich Ihres 
Computers! 

Operation Daten- 
File 

Basic-Programme beste- 
hen aus einer Sammlung 
numerischer Zeilen, die An- 
weisungen an den Compu- 
ter enthalten. Daten, die 
dem Programm sofort zur 
Verfijgung stehen sollen, 
mussen als String- oder 
Zahlenvarialben fest enthal- 
ten sein - ebenfalls in Pro- 
grammzeilen abgelegt. 

Eine Datei (File) dagegen 
besteht nur aus reinen Ein- 
tragen (wie z.B. ein Telefon- 
buch), ohne Hinweis, was 



damit gemacht werden soil. 
Richard Mansfield, ein be- 
kannter Computerjoumalist, 
hat den Unterschied zwi- 
schen Programm und Datei 
anhand eines einleuchten- 
den Beispiels erklart: 

Stellen Sie sich vor, Sie 
haben im Supermarkt ein 
Dose Tomatensuppe ge- 
kauft. Der Dosenaufkleber 
enthalt beides: Programm 
und File. 

Das ist die Datei: Wasser, 
Tomaten, Salz, Monosodi- 
umglutamat, Farbstoff, Ole- 
oresin. 

Das Programm dazu 
heiBt: 

1. Vorsichtig offnen 

2. Inhalt in einen Topf gie- 
Ben 

3. eine Tasse Wasser hin- 
zufiigen 

4. auf kleiner Flamme er- 
hitzen 

5. ungewurzt servieren 
Programme speichert 

man mit SAVE. Geladen 
werden Sie mit LOAD. 

Dateien benotigen eine ei- 
gene Befehlskombination 
mehrerer Basic-Worter. 
OPEN-Anweisung 

Will man eine Datei laden 
Oder speichern, muB zu- 
nachst eine Verbindung vom 
Computer zum externen 
Speichergerat (Floppy) her- 
gestellt werden: eine Anwei- 
sung an den C64, sich fur 
den Datentransfer bereitzu- 
halten. Man nennt dies »eine 
Datei 6ffnen«, vergleichbar 
mit dem Offnen eines Kartei- 
kastens. 

Die zusatzlichen Anga- 
ben (Parameter) hinter 
OPEN erfullen wichtige Auf- 
gaben: 
Dateinummer 

Damit wird die geoffnete 
Datei gekennzeichnet. Er- 
laubt sind Zahlen zwischen 
1 und 255 (in unserem Bei- 
spiel »2«). Die Dateinummer 
dient als Referenz bei jedem 
Zugriff, um den Computer 
nicht zu verwirren - es kon- 
nen immerhin bis zu zehn 
verschiedene Dateien geoff- 
net sein. 
Geratenummer 

...ist die Kennzahl dafur, 
mit welchem externen Gerat 
der Computer eine Verbin- 
dung herstellen soil: 
0: Tastatur 
1: Datasette 



3: Bildschirm 

4: oder 5: Drucker 

6: Plotter 

8 bis 11: Diskettenstationen 

Fehlt die Angabe der Ge- 
ratenummer, setzt der C64 
automatisch »1« ein (Data- 
sette). 
Sekundaradresse 

...kann ebenfalls eine 
Zahl zwischen und 255 
sein. Bei den verschiedenen 
Peripheriegeraten hat sie 
unterschiedliche Bedeu- 
tung: 

Diskettenlaufwerk: 
und 1: reserviert vom Be- 
triebssystem 

2 bis 14: stellt einen Daten- 
kanal zur Verfijgung. Ach- 
tung: Es konnen nur maxi- 
mal drei Datenkanale 
gleichzeitig geoffnet sein! 

15: reserviert fur den 
Fehler- bzw. Befehlskanal 
Dateiname 

Diese Zeichenkette wird 
als Name ins Directory der 
Floppy ubernommen. Sie 
darf auch eine Stringvaria- 
ble sein, im Klartext muB sie 
allerdings in AnfiJhrungszei- 
chen stehen. 
Dateityp 

Man benotigt ihn nur bei 
Diskettenoperationen. Es 
genugt, den ersten Buchsta- 
ben anzugeben: 
SEQ (S): sequentielle Datei 
USR (U): User-Datei 
PRG (P): Programmdatei 
REL (R): Relative Datei 
SEQ-Dateien werden am 
haufigsten verwendet und 
sind auch am leichtesten zu 
verstehen. Wir werden uns 
daher den anderen Dateity- 
pen im Rahmen unseres 
Kurses nicht widmen. 
Modus 

...ist ebenfalls nur bei Dis- 
kettenoperationen relevant 
und bestimmt wie der Da- 
tenkanal genutzt wird: 
W: Datei schreiben (WRITE) 
R: Daten lesen (READ) 
A: Datei erweitern, neue Da- 
ten anfugen (APPEND) 

Beginnen wir unsere Da- 
teiarbeit: 
10 open 2,8,2, "datei, s,w" 

Es ist eine sequentielle 
Datei (S), die auf Diskette 
geschrieben (W) werden 
soil. Wollen Sie den Dateina- 
men als Variable definieren 
(z.B. DT$=»DATEI«), lauten 
die Befehlszeilen: 
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5 dt$= "datei" 

10 open 2,8,2,dt$+",s,w" 

Urn jetzt Daten auf die 
Diskette zu speichern, miis- 
sen Sie eine Variation des 
PRINT-Befehls verwenden: 
PRINT # -Anweisung 

Dahinter mu6 unbedingt 
dieselbe Dateinummer ste- 
hen, die Sie bei der OPEN- 
Anweisung verwendet ha- 
ben. Dann folgt die Zeichen- 
kette oder Variable, die Sie 
speichern mochten: 

20 print#2,"fussball" 
30 print #2, "tennis" 
40 print #2, "handball" 

Diese drei Eintrage rei- 
chen zunachst. Nun soil die 
Datei wieder geschlossen 
werden: 
CLOSE-Befehl 

Hier genugt es, wenn Sie 
nur die Dateinummer ange- 
geben. Senden Sie sicher- 
heitshalber aber zur exak- 
ten Kennzeichnung des Da- 
teiendes zuvor noch einen 
PRINT #-Befehl mit einem 
selten benutzten Zeichen, 
z.B. den Stern <*> (wa- 
rum das so wichtig ist, wer- 
den wir noch sehen): 

50 print #2, "*" 
60 close 2 
70 end 

Wenn Sie das Listing 
(write. seq auf der Diskette 
zum Sonderheft) mit RUN 
starten, wird die Floppy ta- 
tig. Im Disketten-Directory 
findet man nun eine neue 
Datei vom Typ SEQ, mit 
dem Namen »datei«. 

Files auf Diskette sind nur 
dann interessant, wenn man 
sie auch wieder lesen kann. 
Das Prog ram m dazu ist in 
der Struktur identisch mit 
der Routine furs Speichern, 
ein neuer Befehl kommt 
dazu: 
INPUT # -Anweisung 

Hiermit holt man Strings 
und Zeichenketten aus ei- 
ner Datei wieder in den 
Computer. Zuvor muB man 
das File wieder offnen: 

10 open2,8,2, "datei, s,r" 

Die Namen der Sportar- 
ten (unsere Daten) wurden 
vorher im Klartext gespei- 
chert - das geht bei 
INPUT# nicht! Der Compu- 
ter kann beim Laden weder 
wissen, welcher String ge- 



meint noch wie lang er ist 
(das ist wichtig fur die Spei- 
cherverwaltung!). Weisen 
Sie den jeweiligen Zeichen- 
ketten, die Sie beim Laden 
erwarten, beliebige String- 
Namen zu, z.B. A$, B$ und 
C$. 

20 input#2,a$ 
30 input#2,b$ 
40 input#2,c$ 
50 close 2 
55 printa$,b$,c$ 
60 end 

Falls Sie auch bereits 
beim Speicher Variablen 
verwendet haben, ist es un- 
notig, daB die String-Namen 
ubereinstimmen. Wurde bei 
PRINT#z.B.X$,Y$undZ$ 
benutzt, durfen die Varia- 
blen bei INPUT# getrost 
E$, F$ und G$ heiGen - 
wichtig ist allein der Varia- 
blentyp (numerisch oder 
Zeichenkette). Sonst gibt's 
einen »File Data Error«. Das 
Programm ist ebenfalls auf 
der Sonderheftdiskette: re- 
ad. seq. 

Naturlich lassen sich 
auch numerische Variablen 
oder Zahlen speichern. Im- 
merdran denken: Beim Ein- 
lesen mit INPUT# dann 
ebenfalls numerische Varia- 
blen verwenden! 

Daten kann man noch mit 
einem anderen Befehl ho- 
len: 
GET # -Anweisung 

Dieser Befehl arbeitet im 
Prinzip wie INPUT#, liest 
aber immer nur ein einziges 
Zeichen! Man verwendet ihn 
deshalb am besten in einer 
Schleife: 

10 open 2,8,2, "datei, s,r" 

20 get#2,a$ 
30 printa$; 
40 goto 20 

Das Programm funktio- 
niert zwar (Sie erhalten die 
drei Worter untereinander 
auf dem Bildschirm), aber 
die Schleife macht unver- 
drossen weiter! Jetzt wird 
klar, warum wir bei der Pro- 
grammerlauterung zu wri- 
te. seq vorgeschlagen ha- 
ben, mit dem Stern ein zu- 
satzliches Dateiende-Kenn- 
zeichen zu setzen. Dieses 
Grafikzeichen konnen wir 
jetzt namlich abfragen, 
wenn Sie folgende Zeilen in 
unser Beispielprogramm 
einfiigen: 

21 ifa$=chr$(42) then 50 
50 close 2 
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Sie konnen mit diesem Beispielprogramm maximal 100 Biicher in 
Datensatzen zu je sechs Datenfeldern erfassen. Der Datenfeldna- 
me heiSt im Programm immer »Kategorie«. Wir schlagen vor, den 
Datenfeldern folgende Funktionen zuzuordnen: 

1. Kategorie: Buchtitel 

2. Kategorie: Autor 

3. Kategorie: Verlag 

4. Kategorie: Sachgebiet 

5. Kategorie: Preis 

6. Kategorie: Bestellnr. 

Nach diesem Prinzip sind die Datensatze in der sequentiellen 
Datei »literatur« abgelegt. Selbstverstandlich steht dieses universel- 
le Programm auch fur andere Dateiarten often, z.B. Adressen, Vi- 
deos, Schallplatten usw. Sie konnen die Kategorienamen Ihren 
Wunschen entsprechend vergeben. 

Zeile 8: Die gesamte Datei wird durch die DIM-Anweisung mit 
100 Datensatzen zu je sechs Feldern eingerichtet. Diese Zahlen 
lassen sich jederzeit verandern und anpassen. 

Zeile 9: stellt die Bildschirmfarben ein (Rahmen und Hintergrund 
schwarz, Schriftfarbe hellgrau). 

Zeile 10: loscht den Bildschirm, aktiviert mit CHR$(142) den 
GroBschriftzeichensatz und setzt die Flag-Variable auf »0«. 

Zeilen 15 bis 50: Dieser Meniitext erscheint auf dem Bildschirm. 

Zeilen 55 bis 66: fragen die Tastatur ab, ob eine der Zahlenta- 
sten <1 > bis <5> gedriickt wurde. Trifft dies zu, springt das Pro- 
gramm zur entsprechenden Unterroutine. Die Riicksprungschleife 
muBte zweigeteilt werden: Je nach Inhalt des Variablen-Flags FL 
hCipft das Programm nur zur GET-Abfrage oder zum Meniibeginn. 
In der Beschreibung zu on.ziffer haben wir die Griinde fur den 
Einsatz dieses Flags ausfiihrlich erlautert. 

Zeilen 100 bis 195: bilden das Unterprogramm »Datei laden«, 
das man mit der Taste < 1 > aktiviert. Die Datei »literatur« wird mit 
der Schleife K und per GOTO-Anweisung in Zeile 170 geladen. Als 
Datenende-Kennzeichen gilt der Klammeraffe. 

Zeilen 200 bis 340: umfassen die Suchroutine, in der nach ei- 
nem markanten Stichwort gefragt wird. Welche der sechs Katego- 
rien Sie verwenden, ist egal: Nur muB es immer mit dem entspre- 
chenden Datenfeldeintrag exakt ubereinstimmen (z.B. 4. Kategorie: 
Grafik), sonst findet der Computer nichts. Die Suche beginnt mit 
den beiden Schleifen S und K in den Zeilen 220 und 230. Mit IF- 
THEN vergleicht der C64 in Zeile 240 das Stichwort (S$) mit den 
vorliegenden Datenfeldern. Wurde er fiindig, bringt er in der 
Schleife Z alle sechs Datenfelder des dazugehorenden Datensat- 
zes auf den Bildschirm. Die Zeilen 250 und 270 arbeiten die Schlei- 
fen K und S ab. Ist der Durchlauf beendet, erscheint die entspre- 
chende Meldung (auch wenn der Computer nichts gefunden hat). 
Mit <J> konnen Sie es noch einmal versuchen (zuriick zu Zeile 
10) oder mit <N> per RETURN-Anweisung ins Menu zuriickkeh- 
ren - nicht, ohne vorher das Flag FL gesetzt zu haben (= 1)! 

Zeilen 400 bis 480: kummem sich urn den Menupunkt 3 (Daten 
eingeben). Die Zahlvariable K erhalt den Grundwert 1. Die Zeilen 
430 und 440 bilden eine Schleife, die mit GOTO arbeitet. Nachein- 
ander gibt der Computer die sechs Kategoriefragen aus und erwar- 
tet Ihre Eintrage. Ist die Variable K kleiner als 6, wird sie urn »1« er- 
hdht. Das Programm springt zuriick zu Zeile 430 und bringt die 
nachste INPUT-Abfrage. Nach sechs Durchgangen konnen Sie ent- 
scheiden, ob Sie einen weiteren Datensatz (das nachste Buch) er- 
fassen mochten - dann muB die Datensatzmenge D ebenfalls um 
»1« erhoht werden - oder zum Menu zuriickkehren wollen. Vorher 
ruft der Computer mit GOSUB 501 in Zeile 480 die Speicherroutine 
auf. 

Zeilen 500 bis 580: Es erscheint die Sicherheitsabfrage, ob eine 
Diskette im Laufwerk liegt. Durch Tipp auf eine beliebige Taste 
(darauf wartet die Zeile 503) startet das Speichern in Zeile 510 mit 
dem Offnen der Datei »literatur« zum Schreiben (S,W). Wer mit 
dem Klammeraffen vor dem Dateinamen nichts anfangen kann: 
Damit weisen Sie die Floppy darauf hin, daB eine bereits 
bestehende Datei auf Diskette iiberschrieben werden soil 
(REPLACE-Funktion, bitte im Floppy-Handbuch nachlesenl). Da 
der Dateiname bei jeder Computersitzung »literatur« lautet, wurden 
Sie ohne den REPLACE-Klammeraffen stets die Fehlermeldung 
»File exists (Datei existiert bereits auf Diskette)" erhalten. In den 
Zeilen 520 und 530 beginnt das Speichern mit: D ist die Menge der 
eingegebenen Datensatze (bei »1« beginnend), K sagt dem 
Computer, daB zu jedem D immer sechs Datenfelder gehoren. 
Zeile 570 schreibt einen Klammeraffen ans Ende der Gesamtdatei. 
Geschlossen wird sie in Zeile 570. AnschlieBend kehrt das 
Programm wieder ins Hauptmenu zuriick (Zeile 580). Achtung: FL 
muB »1« sein! 

Zeilen 600 bis 610: sind furs Programmende zustandig, wenn 
man die Taste <5> gedriickt hat: Der Bildschirm wird geloscht 
und die READY-Meldung ausgegeben. 
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GET# liest so lange, bis 
es den Stern findet und 
beendet die Leseroutine! 

Einen Schonheitsfehler 
sollten wir noch ausmerzen: 
Bei write. seq stort, daB alle 
Daten mit einem eigenen 
PRINT#-Befehl verschickt 
werden. Bei drei Wortern 
geht's noch, aber bei 50 
Oder 100? Jetzt konnen Sie 
unter Beweis stellen, daB 
Sie unseren Basic-Kurs auf- 
merksam verfolgt haben: 
Bilden Sie eine Schleife fur 
PRINT# und legen Sie die 
Worter in DATA-Zeilen ab! 
Wer sehen will, ob er alles 
richtig gemacht hat, kann es 
mit dem Listing print # un- 
serer Diskette vergleichen. 
Die erzeugte SEQ-Datei laBt 
sich mit get # wieder in den 
Computer holen, wenn Sie 
in Zeile 10 des Listings den 
Dateinamen in »sport« an- 
dern. 

Fuhlen Sie sich inzwi- 
schen fit genug, gemeinsam 
mit uns ein Programmpro- 
jekt in Angriff zu nehmen? 
Gerade in Verbindung mit 
dem Speicher- und Lade- 
routinen der Floppy lassen 
sich komfortable und nutzli- 
che Datenbanken konstru- 
ieren. Dazu greifen wir auf 
unser bisher erworbenes 
Wissen uber Basic 2.0 zu- 
rilck. Das Programm soil 
literatur-datei heiBen und 
uns ermoglichen, beliebige 
Bucher zu erfassen und auf 
Wunsch zu suchen. Die Da- 
tei, die dam it erzeugt wird, 
benutzt zweidimensionale 
Felder und nennt sich »lite- 
ratur«. Sie finden das ent- 
sprechende Programm auf 
der Diskette zum Sonder- 
heft. Beachten Sie die Be- 
dienungsanleitung und die 
Programmerlauterung im 
Kurzinfo-Kasten. 

Der Graf ikatlas 

Faszinierend sind die grafi- 
schen Moglichkeiten des 
C64. Durch entsprechende 
Einstellung kann man den 
Textbildschirm mit seinen 25 
Zeilen zu je 40 Spalten in ei- 
ne hochauflosende Grafik- 
landkarte (Bitmap) verwan- 
deln. 

Was bedeutet hohe Auflo- 
sung? Der normale Textbild- 
schirm bietet nach dem Ein- 



schalten des Computers 
1000 markante Speicher- 
stellen, die man entweder 
ein- Oder ausschalten kann: 
25 Zeilen x 40 Spalten = 
1000 Platze. In jedem Bild- 
punkt steht ein Zeichen 
(Charakter) des aktiven Zei- 
chensatzes. Das konnen 
Buchstaben, Zahlen, Grafik- 
zeichen von der Tastatur - 
oder Leerzeichen sein (dann 
ist der Bildschirm geloscht!). 
Beachten Sie die Tabelle der 
Bildschirmcodes im Hand- 
buch des C64. Eines haben 
alle Zeichen gemeinsam: 
Sie bestehen aus einer Ma- 
trix von 8 Byte mit jeweils 8 
Bit, also 64 Bildpunkten (Pi- 
xel). Der Computer verfiigt 
in einer Tabelle im Betriebs- 
system uber 255 verschie- 
dene Codes pro Zeichenma- 
trix. Je nachdem, welcher 
Wert angegeben wird, er- 
scheint die betreffende 8 x 
8-Pixel-Matrix an gewiinsch- 
ter Cursor-Position auf dem 
Bildschirm. Direkt beeinflus- 
sen lassen sich diese Pixel 
nur beim Andern des Zei- 
chensatzes - und da auch 
nur Byte fur Byte pro Zei- 
chen. Eine spezielle Spei- 
cherstelle hat einen Schal- 
ter, der den Anzeigemodus 
des Computers verandert: 
Bit 5 in $D011 (53265). Ist 
das Bit aktiviert (Wert 32), 
benutzt der Computer die 
»High Resolution (Hires). 
Aus 1000 Bildpunkten sind 
nun 64mal soviel geworden: 

8 Bit x 8 Byte x 1000 Bild- 
stellen = 64000. Jetzt kon- 
nen Sie statt einer 8 x 
8-Punkte-Matrix jedes ein- 
zelne Bit in diesem Feld be- 
einflussen: 1 = Bit einge- 
schaltet, = Bit geloscht. 
Als Berechnungsgrundlage 
wird die vom Textmodus be- 
kannte Auflosung benutzt: 
40 Spalten zu jeweils 8 Bit 
ergeben 320 Pixel in hori- 
zontaler (x-) Richtung, 25 
Zeilen pro 8 Byte registrie- 
ren 200 vertikale Bildpunkte 
(y-Richtung). Daran erkennt 
man, daB hochauflosende 
Grafik sehr speicheraufwen- 
dig ist: 64000 Bit benotigen 
8000 Adressen im Compu- 
ter (64000 : 8). 

»Bitmapping« ist die meist 
verwendete Grafiktechnik 
beim Computer (nicht nur 
beim C64!), urn detaillierte 



Bilder wiederzugeben 

(vergleichbar mit dem gera- 
sterten Bild in einer Zei- 
tung). Neben der Standard- 
Bitmap des C64 gibt's noch 
den Multicolormodus, der 
zwar vier verschiedene Far- 
ben bietet, dies aber mit ei- 
ner geringeren Auflosung 
bezahlen muB: nur noch 160 
Pixel in horizontaler Rich- 
tung. Wir wollen in unserem 
Basic-Kurs Wege zeigen, 
wie man diese Bitmaps in 
Basic erzeugt und aktiviert. 
Dies ist zwar prinzipiell ei- 
ne Aufgabe fur Maschinen- 
sprache, denn Grafikbefehle 
gibt's im Basic 2.0 des C64 
(im Gegensatz zu Basic 7.0 
des C 128) uberhaupt nicht... 
Trotzdem: Es geht, mit den 
entsprechenden Rechen- 
routinen und dem Einsatz 
vieler Variablen! Schalten 
wir zunachst die Hires- 
Bitmap ein: 

10 poke 53265, peek(53265) 
or 32 

Bit 5 wurde durch die OR- 
Verknupfung aktiviert. Nach 
dem Start unserer Basic- 
Zeile mit RUN erschient je- 
doch nur wirres Byte-Chaos 
auf dem Bildschirm. Druk- 
ken Sie nun die Tastenkom- 
bination < RUN/STOP 

RESTORE > Oder geben 
Sie »blind« ein: 

POKE 53265, 

PEEK ( 53265 )AND223 

Damit ist der Originalzu- 
stand wiederhergestellt. Au- 
Berdem: Das Gewirr, das Sie 
gesehen haben, waren die 
ersten 8000 Byte des C64 
(Speicherstellen bis 7999), 
denn exakt dort liegt nun die 
Bitmap. Das bringt Proble- 
me: Andern wir dort irgend- 
welche Bits oder Bytes, 
dann verandern wir even- 
tuell wichtige Speicher- 
adressen der Zeropage (0 
bis 255), des Speichersta- 
pels (Stack, von 256 bis 511), 
der Betriebssystemvektoren 
ab 768 - und last not least 
unseres Basic-Programms, 
das ab Adresse 2049 be- 
ginnt. Diese Lage unserer 
Grafiklandkarte ist alles an- 
dere als gunstig...wo soil 
man sie plazieren und wie 
laBt sie sich umstellen? Die 
Frage nach dem »Wo« ist 
schnell beantwortet: Inner- 
halb eines Bereichs von 16 
KByte (= 16384 Byte), den 



der Videochip VIC-II uber- 
blicken kann. Da die ersten 
8000 Byte aus den genann- 
ten Grunden nicht in Frage 
kommen, sind's eben die 
zweiten: ab Adresse 8192 
bis 16191. Teilen wir die An- 
fangsadresse durch »1024« 
und POKEn das Ergebnis 
(8) in die Speicherstelle 
53272: 

20 poke 53272, peek(53272) 
or 8 

Da der Beginn der Bitmap 
(8192) bei unseren weiteren 
Berechnungen noch eine 
Rolle spielen wird, spei- 
chern wir diese Zahl am be- 
sten in einer Variablen: 

5 ba=8192 

20 poke 53272, peek(53272) 

or ba/1024 

Urn uns des Byte-Gewirrs 
auf dem Bildschirm (es zeigt 
die aktuellen, zufalligen In- 
halte der Adressen 81 92 bis 
16191) zu entledigen, muB 
dieser Bereich geloscht wer- 
den (pro Byte eine »0« ein- 
tragen!): 

30 for i=ba to ba+7999 
40 poke i,0 
50 next i 

Nach RUN kann man be- 
obachten, wie sich das Cha- 
os auflost und einem freien 
Bildschirm Platz macht. 
Ganz stimmt das nicht: Es 
bleiben noch immer einige 
undefinierbare Farbblocke 
zuruck: Sie haben mit der 
Hires-Bitmap nichts zu tun, 
sondern mit dem Farbspei- 
cher fur die Grafiklandkarte. 
Diese Farben kommen nun 
nicht mehr aus den Adres- 
sen 55296 bis 56295 (wie im 
Textmodus), sondern wur- 
den vom Computer automa- 
tisch nach 1024 bis 2023 
verlegt (im Textmodus ist 
das der Bildschirmspei- 
cher). Da es aber nach wie 
vor nur 1000 Byte geblieben 
sind, muB man sich damit 
abfinden, daB sich trotz 
hochauflosender Grafik im- 
mer nur 8x8 Pixel verschie- 
denfarbig anzeigen lassen: 
Pro Pixel eine eigene Farbe, 
das wurde nochmals 64000 
Byte erfordern (die der C64 
nicht hat). 

Wie stellt man die Farbe 
ein? Bei der Standard- 
Bitmap gibt's nur zwei Far- 
ben: Zeichenfarbe (Vorder- 
grund) und Hintergrund. Die 
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Rahmenfarbe bestimmt 
nach wie vor die Speicher- 
stelle 53280 (wie schon aus 
dem Textmodus bekannt). 
Das Farb-Byte muB nun in 
zwei Halften geteilt werden: 
Die oberen 4 Bit (deren Ge- 
samtwert multipliziert man 
mit »1 6«) sind fiir die Vorder- 
grundfarbe, die unteren 4 
Bit (sie behalten ihren realen 
Wert) fur den Hintergrund 
zustandig. Ein Beispiel: Sie 
mochten eine gelbe Hinter- 
grundfarbe mit blauen Gra- 
fikpixeln. Gelb hat den Farb- 
code »7«, Blau die Nummer 
»6«. Die Rechenformel sieht 
dann so aus (C ist z.B. die 
Farbvariable): 

55 c = 16 * 6 + 7 

Urn diese Farbwahl alien 
1000 Speicherplatzen des 
Hires-Farb-RAM mitzutei- 
len, mussen wir wieder eine 
Schleife benutzen: 

60 for i=1024 to 2023 
70 poke i,c 
80 next i 

Schneller als beim L6- 
schen des Hires-Bereichs 
f lit sich nun der Bildschirm 
mit gelber Farbe. 

Urn ein Pixel zu setzen 
oder zu loschen, muB der 
Computer naturlich wissen, 
wie er das richtige Bit im 
Speicherfindet. Das bedeu- 
tet: Er muB das zu andernde 
Zeichen, die Zeichenreihe 
und das entsprechende Bit 
in dieser Reihe identifizie- 
ren. Fur den C64 existiert 
namlich theoretisch noch 
immer der Textbildschirm, 
der mit 25 Zeilen 40 Spalten 
vollgeschrieben ist, nur laBt 
er im Hires-Modus zu, daB 
man den Speicherbereich 
anders interpretiert (Abb. 9). 
Urn die exakte Position ei- 
nes Bildpunktes zu fixieren, 
gibt's bestimmte Rechen- 
funktionen, die man numeri- 
schen Variablen zuweist. 
Den Beginn des Hires- 
Bildschirms haben wir be- 
reits mit BA = 8192 festge- 
legt. Die Position in der Bild- 
schirmzeile errechnet sich 
so: 

R0 = INT(Y/8) 

Das zugehorige Zeichen 
(Charakter) wird mit dieser 
Formel berechnet: 

CH = INT(X/8) 



Die Byte-Zeile innerhalb 
dieser Zeichenmatrix: 

LI = Y AND 7 

Das entsprechende Bit 
aus diesem Byte: 

BI = 7-(X AND 7) 

Alle Formeln muB man 
nun zusammensetzen. Die 
Byte-Zeile, in der das Pixel 
liegt, kann man jetzt ein- 
grenzen: 



BY = BA + R0*320 
LI 



CH*8 



Endlich ist's soweit! Der 
gewunschte Bildpunkt er- 
scheint mit dieser POKE- 
Anweisung auf der Grafik- 
Bitmap: 

POKE BY, PEEK(BY) OR 2BI 

Dazu gibt's funf Demo- 
programme unserer Disket- 
te, setpixel zeigt, wie man 
Bitmaps einschaltet, das 
Farb-RAM initialisiert und 
nach Eingabe der x- und y- 
Koordinate einen Bildpunkt 



in der Hires-Grafik erzeugt. 
Da der Grafikbildschirm nur 
das erste Mai geloscht wird, 
bleibt das eingeschaltete Pi- 
xel erhalten. Wenn Sie mit 
einem Tastendruck zuruck 
zur nachsten Koordinaten- 
eingabe schalten, lassen 
sich so beliebige Grafiken 
entwerfen. Ein wenig muh- 
sam ist es schon, da man 
Punkt fur Punkt eintragen 
muB. 

Das Programm draw.bas 
geht bereits einen Schritt 
weiter: Damit kann man 
ganze Linien in der Bitmap 
fabrizieren (Abb. 10). Sie 
mussen lediglich Start- und 
Endkoordinaten der Linie 
angeben, Lange und Bild- 
punkte dazwischen berech- 
net das Programm automa- 
tisch und setzt an entspre- 
chender Stelle ein Pixel. Da- 
zu bildet es eine Schleife, 
deren Wert fur die Laufvaria- 
ble aus der Differenz zwi- 
schen Start und Ende gebil- 
det wird. Da bei diesem Bei- 
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[9] Die Aufteiiung der Grafik-Bytes im Hires-Modus 
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[10] Hires-Grafik und Basic 2.0: Viel Zeit vergeht. 



spielprogramm vor jedem 
neuen Durchlauf die Grafik- 
landkarte nicht mehr ge- 
loscht wird, kann man pro- 
blemlos mehrere Linien ein- 
tragen und somit geometri- 
sche Gebilde erzeugen. 

box.bas macht mehr aus 
dem diesem Beispielpro- 
gramm: Umstandliche Koor- 
dinateneingaben entfallen. 
Sie sind bereits als DATA- 
Zeilen im Programm abge- 
legt und werden durch den 
READ-Befehl wieder in den 
Variablenspeicher geholt. 
Man sieht Rechtecke unter- 
schiedlicher GroBe auf dem 
Bildschirm. Die Zeichenge- 
schwindigkeit laBt allerdings 
zu wunschen ubrig! 

Was waren grafische Ge- 
bilde auf einer Hires-Bitmap 
ohne Kreise? circle.bas 
zeigt, daB sich auch dieser 
Grafikkorper mit Basic-Be- 
fehlen realisieren laBt. Wer 
glaubte, daB man mit dem 
Radius und der Lu- 
dolf'schen Zahl Pi (das ist 
die Konstante 3,14159265, 
die bei Kreisberechnungen 
eingesetzt wird) arbeiten 
muB, sieht sich eines Besse- 
ren belehrt: Der Program- 
mierer benutzt zur Berech-, 
nung die SQR-Funktion des 
Basic 2.0, die eine Quadrat- 
wurzel aus einer beliebigen 
Zahl bildet. Durch geschick- 
te Programmierung (s. Li- 
sting und Kurzinfo) wird so, 
je nach Wert der Koordina- 
ten, auf dem Bildschirm ein 
Halbkreis erzeugt. Durch 
Vertauschen der Vorzeichen 
in der Rechenroutine zeich- 
net der Computer je einen 
Halbkreis auf dem unteren 
und oberen Bildschirm (zu- 
sammengefugt ergibt das 
den ganzen Kreis). 

Alle Grafikelemente (Li- 
nie, Rechteck und Kreis) ver- 
einigt das letzte Programm- 
beispiel zur Hires-Grafik: 
fussballplatz, das ein 
Sportstadion aus der Vogel- 
perspektive zeigt. 

Eines haben alle Basic- 
Beispiele zur hochauflosen- 
den Grafik gemeinsam: Es 
vergeht viel Zeit, bis das 
gewunschte Ergebnis er- 
scheint. Basic ist eine leicht 
erlernbare und einfache 
Computersprache, die aber 
- richtig eingesetzt - optima- 
le Wirkung erzielt. (bl) 
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Erinnern Sie sich ans 
64'er-Sonderheft 56? Die 
Programmieraufgabe in der 
Knobelecke war eine Heraus- 
forderung an alle Ratselfans! 
Hier ist das Siegerprogramm 

von Jurgen Weiland 



Zu gewinnen gab's drei 
Leckerbissen: Geos2.0 
fur den C64, Geobasic 
und Megapack 2 (Abb.1). 
Folgende Aufgabe muBte 
durch ein Programm - Basic 
oder Assembler - gelost wer- 
den: Die Spedition Bitberger 
in Bytehausen will ihre Kun- 
den beliefern. Abb.2 zeigt 
den Stadtplan mit alien neun 
Kunden und dem Standort 
des Spediteurs. Sie sollten 
ein Programm entwickeln, 
das den kiirzesten Lieferweg 
berechnet: Nach dem Start 
muBte man die Koordinaten 
von Spedition und Kunden 
angeben. Wenn der LKW 
nach getaner Arbeit wieder 
in den Speditionshof zuriick- 
gekehrt war, muBte das Pro- 
gramm sowohl Rechenzeit 
als auch Anzahl der StraBen 
ausgeben. GroBen Wert leg- 
ten wir auf Benutzerkomfort. 
Das Programm muBte auf je- 
der Version des C64 lauffa- 
hig sein. Basic-Erweiterun- 
gen oder Hardwaremodule 
waren verboten! 

Nachtraglich beschleicht 
uns das bange Gefuhl, daB 
die Aufgabenstellung zu 
schwer war: Auch bei dieser 




[1] Diese Preise erhalt der Sieger unseres 
Programmierwettbewerbs aus Sonderheft 56 



Knobelecke schaffte es wie- 
der nur ein Leser, die gefor- 
derten Bedingungen in alien 
Punkten zu erfullen: Jurgen 
Weiland (s. Kasten). Ihm ge- 
horen jetzt alle drei Haupt- 
preise: Herzlichen Gluck- 
wunsch! 

Das Siegerpro- 
gramm 

»Beste Wege« finden Sie in 
der schnelleren, kompilier- 
ten Version auf der Diskette 
zum Sonderheft. Sie laBt 
sich wie ein Basic-Pro- 
gramm laden: 

LOAD "BESTE WEGE",8 



Gestartet wird das Pro- 
gramm mit RUN. 

Die Berechnung des kur- 
zesten Weges dauert ca. 
vier Minuten. 64 StraBen 
werden benutzt, die Kunden 
in dieser Reihenfolge be- 
sucht: 

3,4,8,1,5,2,9,6,3,7,3 

Maximal neun Kunden 
lassen sich mit »Beste We- 
ge« verwalten. Man kann 
nach Wunsch wieder zur 
Spedition zuruckkehren, die 
gestrichelten StraBen be- 
nutzen, mit dem integrierten 
Editor neue Stadtplane ent- 
werfen und die Losungen 
zum Drucker schicken. Die 
Namen der Spedition, der 



Kunden und der Stadte las- 
sen sich beliebig umtaufen. 
Ebenso gibt's eine Einstel- 
lung, daB das Programm 
den kurzesten Weg zwi- 
schen nur zwei Kunden 
sucht. Eine grafische Spie- 
lerei rundet die Programm- 
funktionen ab: Innerhalb 
des Stadtplans kann man 
sogar Grunflachen pflan- 
zen! 

Der aktuelle Stadtplan be- 
findet sich wahrend des ge- 
samten Programmablaufs 
auf dem Bildschirm. Alle 
Ein- und Ausgaben erschei- 
nen entweder in der linken 
Bildschirmhalfte oder in se- 
paraten Windows. Die mei- 
sten Funktionen lassen sich 
mit der STOP-Taste abbre- 
chen. »Beste Wege« benutzt 
einen geanderten Zeichen- 
satz mit deutschen Umlau- 
ten, die uber diese Tasten 
erreichbar sind: 
u = <@>, a= <;>, 6 = 
<:>, B= <>. Fur GroB- 
buchstaben drucken Sie die 
SHIFT-Taste. 

Im Hauptmenu sind Pro- 
grammfunktionen enthal- 
ten, die mit der entspre- 
chenden Zahlentaste akti- 
viert werden: 
<1> Editor 

Zunachst erscheint eine 
UbersichtallerTasten.diein 
»Beste Wege« bestimmte 
Funktionen ausfuhren (Ta- 
belle). Emeuter Tasten- 
druck verbannt sie wieder 
vom Bildschirm. Im weiteren 
Programmverlauf kann man 
dieses Hilfsmenu jederzeit 
per <F1 > -Taste aufrufen. 



32 



64'er SONDERHEFT 69 



KNOBELECKE 




[2] Die Aufgabe der 
Knobelecke aus dem 
64'er-Sonderheft 56: 
Wer findet den 

kurzesten 
Lieferweg? 



Mit < RETURN > lassen 
sich, vom Stadtplan posi- 
tionsabhangig, Objekte set- 
zen oder loschen. Auf Leer- 
flachen zwischen den Hau- 
sern kann man Grunzeug 
plazieren. Wenn der Cursor 
direkt auf einem Haus liegt, 
verteilt der Computer auf- 
steigende Kundennum- 
mern. Erneuter Druck auf 

< RETURN > loscht sie 
wieder. 

< SPACE > leitet die Be- 
rechnung ein: Dam it konnen 
Sie im entsprechenden Ein- 
gabefenster den kurzesten 
Weg zwischen zwei Hau- 
sern suchen und auf dem 
Bildschirm ausgeben las- 
sen. Nach Auswahl der bei- 
den Lieferorte laBt sich mit 
der betreffenden Abfrage 
wahlen, ob nur StraBen oder 
auch die Leerflachen dazwi- 
schen benutzt werden dur- 
fen. Dies wirkt sich selbst- 
verstandlich auf die Re- 
chengeschwindigkeit aus. 

Die Namen der Stadt, 
Spedition und Kunden las- 
sen sich nach Wunsch an- 
dern. Wenn Sie die Tasten- 
kombination < SHIFT N> 



drucken, bringt der Bild- 
schirm ein Eingabefenster, 
in dem die bisherige Stadte- 
bezeichnung steht. Die 
mussen Sie jetzt uberschrei- 
ben und < RETURN > 
drucken. Denken Sie dabei 
an die neue Tastenbele- 
gung fur die Umlaute! 

Mit <S> kann man die 
Spedition an die aktuelle Po- 
sition des Editor-Cursors 
setzen. Das entsprechende 
Zeichen besteht ebenfalls 
aus einem HauserumriB, der 
aber im Gegensatz zu ech- 
ten Hausern leer ist. Befand 
sich dort eine bereits defi- 
nierte Kundennummer, wird 
sie allerdings geldscht. War 
das Speditionszeichen be- 
reits an anderer Stelle pla- 
ziert, verschwindet es von 
dort. Dies gilt auch fur nu- 
merierte Hauser, wenn Sie 
diese per Zahlentaste ein- 
stellen (den entsprechen- 
den Kundennamen dazu fin- 
den Sie in der linken Bild- 
schirmhalfte). 

Die Taste < CBM > ist der 
Ausgangspunkt fur Disket- 
tenfunktionen: 

<CBM S> speichert alle 



aktuellen Daten (Stadtplan 
und Namen) als Datei, deren 
Bezeichnung beliebig sein 
darf (nicht langer als 16 Zei- 
chen!). Geben Sie statt des 
Namens das <$>-Zeichen 
ein, bringt der Computer das 
Directory in einem speziel- 
len Window. Mit dem Aus- 
wahl-Cursor laBt sich ein Da- 
teiname bestimmen, der 
dann im oberen Eingabefen- 
ster erscheint. Nach 

< RETURN > erscheint die 
Frage, ob die gleichnamige 
Datei auf der Diskette mit 
den aktualisierten Daten 
uberschrieben werden darf. 

< 2 > Weg suchen 

Mit dieser Funktion be- 
weist das Programm seine 
Starke: Es zeigt auf dem 
Stadtplan exakt, wie die 
Kunden angefahren wer- 
den. Voraussetzung ist aller- 
dings, daB Sie vorher im Edi- 
tormodus Kunden und Spe- 
dition definiert haben. Zu- 
nachst konnen Sie bestim- 
men, ob sich Leerstellen 
zwischen den Hausern be- 
fahren lassen und der LKW 
nach erledigter Kundentour 
wieder zur Spedition zu- 



ruckkehren soil. Zusatzlich 
besteht eine Reihenfolge, in 
der die Kunden beliefert wer- 
den. Nach AbschluB der Ein- 
gaben (mit der Taste 
< RETURN >) beginnt die 
Arbeit des Programms. 
Durch einen ausgeklugelten 
Algorithmus halt sich die 
Rechenzeit in Grenzen. Wo 
der Computer die besten 
Lieferwege im Stadtplan fin- 
det, kennzeichnet er sie 
weiB. Wahrend des Suchvor- 
gangs laBt sich der Pro- 
grammablauf mit <SHIFT> 
anhalten, durch die Tasten 
<CBM> und <CTRL> 
bremsen oder mit 
< RUN/STOP > abbrechen. 
Die Rechenzeit, die dann im 
angezeigten Auswertungs- 
fenster erscheint, wird von 
den genannten Unterbre- 
chungen nicht beruhrt. 

Mit der Leertaste kommt 
der Stadtplan hinter dem 
Ausgabe-Window wieder 
zum Vorschein, <F7> wirft 
die Frage auf, ob die Re- 
chenergebnisse auf Bild- 
schirm oder Drucker ausge- 
geben werden sollen. Ge- 
schieht es auf dem Bild- 
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schirm, stoppt die Ausgabe 
nach jeweils 23 Zeilen und 
wartet auf einen Tastenim- 
puls, bevor es weitergeht. 
Mit <SHIFT> kann man 
die Ausgabe anhalten. 

Druckt Umlaute 



Wenn Sie die Wegfolge 
einzelner Hauser unterein- 
ander interessiert, wahlen 
Sie die entsprechende Zah- 
lentaste. <S> oder <0> 
ist auch hier das Kennzei- 
chen fur die Spedition. Die 
Ruckkehr ins Hauptmenu 
funktioniert nur mit der Taste 
<F7>. 
<3> Drucker 

Funktioniert er oder 
nicht? Diese Kardinalfrage 
stellt sich mit dieser komfor- 
tablen Meniifunktion nicht: 
Die entsprechenden Druk- 
kerparameter kann man be- 
quem anpassen (Voreinstel- 
lungen in Klammern): 

- Sekundaradresse (07), 

- ESC-Codes fur den ASCII- 
Modus (1B4F 1B6C05), 

- Druckerinitialisierung ("IB 
55 01), 

- neue Seite (0C), 

- maximale Zeilenanzahl 
(38). 

Da das Programm keine 
Hires-Grafik benutzt, gibt es 
mit Epson- und Commodo- 
re-kompatiblen Druckern 
keine Schwierigkeiten. Um- 
laute werden automatisch in 
Doppelzeichen umgewan- 
delt (z.B. »ae« statt »a«). Die 
Gerateadresse kann auf »4« 
oder »5« definiert sein: Das 
Programm erkennt es auto- 
matisch. 
<4> Ende 

Nach einer Sicherheits- 
abfrage konnen Sie das Pro- 
gramm verlassen. Der C64 
fuhrt allerdings keinen Re- 
set aus: »Beste Wege« laBt 
sich nach RUN erneut star- 
ten. 

Auf der Suche 



Wie funktioniert das Pro- 
gramm? Ausgehend von al- 
ien Kunden und dem Stand- 
ort der Spedition ermittelt 
»Beste Wege« die kurzesten 
Verbindungen. Dabei wer- 
den alle moglichen Richtun- 
gen getestet: Zuerst die, in 



Jurgen Weiland 



wurde 1966 in Marl (Westfalen) gebo- 
ren. Am Gymnasium im Loekamp 
machte er 1985 das Abitur. Nach der 
Bundeswehrzeit begann er zunachst, 
in Aachen Elektrotechnikzustudieren. 
1988 wechselte er auf der Universitat 
Koblenz den Studienzweig: Informa- 
tik. 

Durch seinen Schwager (ebenfalls 
Informatiksludent) kam er in den 70er 
Jahren das erste Mai mit Computern in 
Beruhrung. 1983 kaufte er sich einen 
TI-99/4A. Mitte 1984 sattelteer auf den 
C64 urn, der durch standige Erweite- 
rungen und Umbauten nicht mehr viel mit dem Original gemeinsam 
hat. Obwohl Jurgen durchs Studium wesentlich leistungsfahigere 
Computer kennengelernt hat, bleibt er seinem C 64 nach wie vor treu. 
Fur ihn reicht er - zumindest zu Hause - vollig aus. 




Kurzinfo: Beste Wege 



Programmart: Anwendung 

Laden: LOAD "BESTE WEGE", 8 

Starten: nach dem Laden RUN eingeben 

Steuerung: Tastatur 

Besonderheiten: Editor fur Stadtplane, Druckerprotokoll 

Benbtigte Blocks: 202 

Programmautor: Jurgen Weiland 



der sich rein logisch das Ziel 
befindet (aktuelle Positionen 
des Start- und Zielhauses). 
Das ist die erste Heuristik, 
die das Programm verwen- 
det. 

Uber die Bedeutung die- 
ses griechischen Wortes be- 
lehrt uns das Lexikon: die 
Lehre von Methoden zur 
Auffindung neuer wissen- 
schaftlicher Erkenntnisse. 

Weitere heuristische Prin- 
zipien, die im Programm 
vorkommen: 

- Hat es eine Losung gefun- 
den, bricht es die Suche be- 
reits ab, wenn sich ein lange- 
rer Weg ergeben wurde. 

- Uberschreitet die Weg- 
strecke einen gewissen Er- 
fahrungswert, wird die Su- 
che an dieser Stelle abge- 
brochen. 

- Im Normalfall sucht »Beste 
Wege« ab der niedrigeren 
Nummer zur nachsthohe- 
ren. Findet das Programm 
aber nach einer bestimmten 
Zeit keine Losung, sucht es 
in umgekehrter Reihenfolge. 
Oft wird damit die Losung 
schneller gefunden. Es 
hangt nicht zuletzt von der 
Richtung der Hauser im 
Stadtplan zueinander ab. 

Fuhren die erwahnten 
Heuristiken nicht zum Er- 
folg, schaltet das Programm 
aufs Backtracking-Verfah- 



ren urn: Es sucht so lange, 
bis es die Losung gefunden 
hat. Unmogliche Aufgaben 
(z.B. keine Verbindung zwi- 
schen zwei Kunden) quittiert 
das Programm mit einer 
Fehlermeldung und bricht 
die Suche ab. Aus alien ge- 
funden Einzellosungen er- 
mittelt der Computer den 
kurzesten Weg und ent- 
scheidet sich dafur (Greedy- 
Verfahren). 

Die losung 



Wer die Auflosung unserer 
Knobelecke im 64'er-Son- 
derheft 56 mit dem Pro- 
gramm nachvollziehen will, 
muR: 



- im Hauptmenu die Taste 
<1 > (Editor) drucken, 

- die Tastenkombination 
<CBM L> aktivieren, und 

- als Dateiname »bytehau- 
sen« eingeben oder das File 
aus dem Directory laden. 

Wenn der Stadtplan im 
Computer ist und auf dem 
Bildschirm erscheint, erken- 
nen Sie, daf3 er mit unserer 
Aufgabenstellung identisch 
ist. Mit der Taste < Pfeil 
nach links > kehren Sie zu- 
ruck ins Hauptmenu. 

Drucken Sie jetzt die Taste 
<2> (Weg suchen). Beant- 
worten Sie die folgenden 
Fragen: 

Leerstellen befahrbar: 
<N>, 

Ruckkehr zur Spedition: 
<J>, 

Reihenfolge vorgeben: 
<N> (schlieBlich soil das 
Losungsprogramm den opti- 
malen Lieferweg selbst her- 
ausfinden!). 

Die Suche beginnt, nach 
4,28 min ist sie beendet: Die 
Losung erscheint. 

Die Knobelaufgabe hat 
dem Autor offensichtlich 
SpaB gemacht, denn er hat 
auBer »bytehausen« noch 
funf weitere Stadtplane mit 
unterschiedlicher Schwie- 
rigkeit entworfen: 

bytehausen-opti 
kleinstadt I 
kleinstadt II 
kleinstadt III 
schlingenhausen 

Laden Sie diese Dateien 
im Editor und lassen Sie das 
Programm die besten Wege 
suchen. Selbstverstandlich 
hindert Sie niemand daran, 
vollig neue Stadtplane zu 
entwerfen. 

(N. Heusler/bl) 



Editiermodus in »Beste Wege« 



Taste 



Funktion 



<F1> Befehlsliste anzeigen 

<CRSR> Cursor im Stadtplan bewegen 

<SHIFTN> Stadtenamen andern 

< SHIFT S> Speditionsbezeichnung andern 

< RETURN > Objekte im Stadtplan setzen/loschen 
<S> Position der Spedition 

<0> s. oben 

<1 - 9> Kundennummern vergeben 

<N> Name des Kunden andern, auf dessen Haus 

der Cursor steht 

< SPACE > kurzesten Weg zwischen zwei Hausern suchen 

< — > Hauptmenu 

<CBM S> Parameter zum aktuellen Stadtplan speichern 

<CBML> Stadtplan laden (USR-Files) 

<CBM D> Stadtplan auf Diskette loschen 
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Sie sind das Salz in der 
Suppe: Die Tricks der 
Programmierprof is ver- 
leihen Basic-Prog ram- 
men den letzten Schliff 
und fiihren natiirlich 
auch Anfanger schnel- 
lerzumZiel. 

Von Graf ikbanken 
und -punkten 



Kniffe, Tips & Tricks in Basic 

Was das Handbuch 
versdiweig t . . . 



W 



ir haben beschrie- 
ben, wie man hoch- 
auflosende Grafik 




[1] Bei Spielen bestehen die meisten Levelbilder aus 
einem geanderten Zeichensatz 



■"■■■■ . ■ ■'.. .■■■.. ■ :•:■ 

aktiviert. Das gait allerdings 
nur unter der Voraussetzung, 
daB Ihr Basic-Program m 
nicht langer als ca. 6000 By- 
te ist: Sonst kommt es mit der 
Hires-Bitmap in Konflikt. Eng 
begrenzt ist der Speicher- 
platz der VIC-Bank 1: Zero- 
page, Basic-Programm, Va- 
riablen und Bitmap, zusam- 
mengepfercht auf 16 KByte. 
Auf der Suche nach einem 
ungestorten Platzchen stoBt 
man auf die ideale VIC-Bank 
2: von 16384 bis 32767. Man 
setzt die Grafiklandkarte in 
den zweiten Teil der Bank (ab 
24576) und verschiebt den 
Bildschirm ebenfalls (1024 
Speicherstellen darunter, ab 
23552). Ihr Vorhaben miis- 
sen Sie dem Computer mit- 
teilen: 

POKE 56576, PEEK(56576) 

AND 252) OR 2 

POKE 56578, PEEK(56578) 0R3 



2sta ^ffiF i=f 



n€€»^SuSi»€sSnwuffi 



Diese beiden Adressen im 
Speicherbaustein CIA II sind 
dafur zustandig. Zwei weite- 
re POKEs sind notwendig: 

POKE 53272, 120: POKE 648, 
92 

Wenn Sie Bit 3 der Adresse 
53272 auf 1 setzen, weiB der 
VIC-Chip, daB sich die Bit- 
map in der zweiten Halfte 
befindet. Die Bits 4 bis 7 tei- 
len dem Computer mit, wo- 
hin der Bildschirmspeicher 
versetzt wurde. AuBerdem 
muB das Betriebssystem 
iiber Speicherstelle 648 in- 



formiert werden, ab wel- 
chem Speicherplatz die 
Bildschirmdaten liegen 
(23552 : 256 = 92). Zwar ist 
die Bitmap jetzt ziemlich 
weit oben im Speicher (Vor- 
teil: Basic-Programme kon- 
nen nun erheblich langer 
sein, mehr als 20000 Byte 
stehen zur Verftigung), aber 
dennoch im Basic-RAM. Die 
Grafik konnte durch Varia- 
blen uberschrieben werden. 
Dem ist abzuhelfen: Gau- 
keln Sie dem C64 vor, sein 
Speicher sei kleiner: 

POKE 51,0: POKE 52,92 
POKE 55,0: POKE 56,92 

Das sind die Zeiger auf das 
Ende der Variablenfelder 
und des gesamten Varia- 
blenspeichers: Nun reichter 
bis maximal 23552 (92 X 
256). 

Bekannt ist inzwischen 
auch, wie die Grafikpixel auf 
dem Bildschirm berechnet 
und plaziert werden. So sehr 
haufiger Variableneinsatz in 
Basic-Programmen zu emp- 
fehlen ist: Sie bremsen den 
Ablauf der Rechen- und Pi- 
xel-Setzroutine erheblich. 
Einfacher und schneller 
geht's, den gesamten Vor- 
gang in drei Basic-Zeilen zu 
definieren: 



24576 

(X AND 504)+40*(Y AND 

(Y AND 7):BI=7-(X AND- 



BA = 
BY = 
248) 

7) 
POKE BA+BY, PEEK (BA+BY) 
OR (2tBl) 



Wir haben die neue Routine 
mit der aus dem Basic-Kurs 
verglichen: Zum Ziehen ei- 
ner durchgehenden Linie 
benotigt sie 6 s weniger! 

Langer dauert dagegen 
das Loschen der Bitmap 
durch Basic-Anweisungen. 
Hier hilft wirklich nur Ma- 
schinensprache. Die ent- 
sprechende Routine finden 
Sie im Grafikbeispiel spee- 
dy hires auf unserer Disket- 
te, das die neue Punktesetz- 
routine verwendet. Die Zei- 
len 1000 bis 1030 beinhal- 
ten die Maschinensprache- 
Data mit Einleseschleife. 
(A. Locker/bl) 

Neuer Zeichensatz 
gefallig? 

So einfach, wie sich's an- 
hort, ist es leider nicht: Der 
C64 holt seine Bildschirm- 
zeichen (Characters) aus 
dem Zeichensatz-ROM ab 
$D000 (53248 bis 57343). 
ROM (Read Only Memory) 



istein Speicherbereich, den 
man nur lesen - aber nicht 
mit POKE beschreiben 
kann. Wer seinen Computer 
z.B. mit deutschen Umlau- 
ten, Sonderzeichen oder 
Mauersteinen fur den Level 
eines Spiels ausstatten will, 
muB den Zeichensatzbe- 
reich an eine passende Stel- 
le ins RAM kopieren (in VIC- 
Bank 1 liegt der ideale Be- 
reich ab Adresse $3000, 
12288 dez.) und die Zeiger in 
den entsprechenden Spei- 
cherstellen darauf richten. 
Diese Basic-Schleife 

macht's: 

FOR 1=0 TO 4095 

POKE 12288+1, PEEK (53248+1) 

NEXT 

POKE 53272, PEEK(53272) OR 

12 

Gehen Sie ruhig inzwischen 
Kaffee trinken, denn es dau- 
ert leicht eine halbe Minute. 
Urn so groBer ist die Enttau- 
schung, wenn Sie wieder- 
kommen. Lediglich die 
Bytes des VIC-, des SID- und 
der CIA-Chips wurden ins 
RAM ubertragen (ganz zu 
schweigen vom Farb-RAM 
ab Adresse 55296), also der 
Ein- und Ausgabebereich 
(1/0-Register). Dieser Platz 
ist im C64 gleich dreimal be- 
legt: 

- 1/0-Bereich, 

- Zeichensatz und 

- freies RAM. 

Welche Konfiguration ak- 
tiv ist, bestimmt Adresse 1 . 
Der Normalinhalt dieser 
Speicherstelle nach dem 
Einschalten des Computers 
ist »55« oder %001 101 1 als 
Binarzahl. Tabelle 1 macht 
die Funktionen der Bit-Bele- 
gungen deutlich (nur die er- 
sten drei sind relevant, »1« 
= Bit ein-, »0« = Bit ausge- 
schaltet). 

Es muB also Bit 2 (Wertig- 
keit: 4) geloscht werden, urn 
das Zeichensatz-ROM zu 
erwischen: POKE 1,51. Und 
schon tritt das nachste Pro- 
blem auf: Durch diesen PO- 
KE wurde der l/O-Bereich 
abgeschaltet - der Compu- 
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ter gehorcht keiner Eingabe 
mehr! Schuld daran ist der 
Interrupt, den der C64 alle 
Veostel Sekunden ausfiihrt 
(Tastatur abfragen, Bild- 
schirm erneuern usw.). 
Wenn Sie diese Unterbre- 
chungen auch noch ab- 
schalten (Speicherstelle 
56334 auf »0« setzen), dann 
klappt's: 

10 poke 56334,0: poke 1,51 

20 for 1=0 to 4095 

30 poke 12288+i,peek(53248 

+i) 

40 nexti 

50 poke 1,55: poke 56334,1 

60 poke 53272, peek(53272)o- 

rl2 

Zeile 60 bedarf einer Er- 
lauterung: Die unteren 4 Bits 
der Adresse 53272 enhalten 
den Zeigerwert fiir den Be- 
ginn des Zeichensatzbe- 
reichs, den der Computer 
verwenden soil (man muB 
die Zahl mit »1024« multipli- 
zieren: 12288). Jetzt konnen 
Sie die Byte im RAM nach 
Belieben andern und urn- 
modeln. 

Auch dieses Verfahren ist 
nicht gerade ideal: Abgese- 
hen von der Ubertragungs- 
dauer (30 s) bleibt Ihnen 
auch hier nicht viel Platz fiir 
Ihr Basic-Programm: knap- 
pe 12000 Byte. Wie im Bei- 
spielprogramm speedy hi- 
res ist zu empfehlen, die 
VIC-Bank 2 einzuschalten 
und z.B. dort einen fertig ge- 
anderten Zeichensatz an 
die relative Adresse 12288 
(erhoht urn »16384«, also 
»28672) zu laden (POKE- 
Wert fiir 53272: 188). Der 
Bildschirmspeicher muB 
ebenfalls relativ verschoben 
werden (am besten 1000 By- 
te darunter): 27648. Diesen 
Wert, geteilt durch »256«, 
mussen Sie zusatzlich in die 
Adresse 648 POKEn: 108 
(Normalinhalt: 4). Damitste- 
hen Ihnen immerhin 25600 
freie Basic-Byte zur Verfu- 
gung. 

Laden und starten Sie un- 
ser Programmbeispiel char- 
lader. Sie haben die Wahl 
zwischen zwei fertigen 
Zeichensatzen- amiga.char 
und game. char, die jeweils 
4096 Byte lang sind und 17 
Blocks auf der Diskette um- 
fassen. Geben Sie nach 
dem Start den gewiinschten 
Zeichensatznamen ein. ga- 
me. char bietet auBer deut- 



schen Umlauten auch eini- 
ge geanderte Zeichen, die 
sich z.B. gut eignen, Level- 
bilder fur Spiele zu entwer- 
fen (Abb.1). Die neuen Zei- 
chen finden Sie auf folgen- 
den Tasten: 

<@> = U, <[> = 6, 
<]> = A<Pfeil hoch> = 
6. <->, <>,<#>, <> 
und < SHIFT A> sind Mau- 
ersegmente. <SHIFT S> 
und < SHIFT D> erzeugen 
Fullflachen. (bl) 



Bremsfallschirm 



Auch wenn er oft als zu lang- 
sam verwiJnscht wird: Bei 
der Bildschirmausgabe z.B. 
von Listings ist der C 64 wie- 
selflink - der Basic-Text 
huscht uber den Bildschirm, 
bevor man ihn richtig lesen 
kann. Zwar gibt's mit 
<CTRL> eine Bremstaste, 
aber das Utility bildsch. 
langsam verlangsamt jede 
Ausgabe auf dem Bild- 
schirm urn ein Vielfaches. 
Nach dem Laden und Start 
mit RUN schreibt es den Ma- 
schinencode zunachst in 
den Bildschirmspeicher und 
verschiebt sich nach 53228. 
Alle Betriebssystemvekto- 
ren, die fiir die Bildschirm- 
ausgabe zustandig sind, 
werden nun auf diese Adres- 
se gerichtet. Das Utility 
macht nichts anderes, als 
zwischen jedem Interrupt 
zwei Verzogerungsschleifen 
zu erzeugen. Mit <RUN/ 
STOP RESTORE > Oder 

POKE 806,202: POKE 807,241 

kann man die Erweiterung 

abschalten. 

die Ausgabegeschwindig- 

keit laBt sich mit »POKE 

53232, Zahl (0 bis 255)« re- 

gulieren. Voreingestellt ist 

»1«. (Dominik Irion/bl) 



Bildschirm- und 
ASCII-Codes 



Sie haben's sicher schon 
bemerkt: der Code fiir die 
Zeichen auf dem Bildschirm 
und die ASCII-Werte (CHR$) 
stimmen nicht immer uber- 
ein. Uberpriifen Sie folgen- 
des Beispiel: Ein »A« laBt 



sich per Bildschirmcode so 
erzeugen: 

POKE 1024,1 

Wollen Sie das »A« als 
ASCII-Code erscheinen las- 
sen, mussen Sie die Zahl 
um »64« erhohen: 

PRINT CHR$(65) 

Die Basic-Routine bs/ 
ascii-code nimmt Ihnen die 
Rechenarbeit ab. Nach dem 
Start mit RUN mussen Sie 
den gewunschten Bild- 
schirmcode eingeben. Um- 
gehend erhalten Sie den 
ASCII-Wert auf dem Bild- 
schirm. Man muB allerdings 
beachten, daB jeder Bild- 
schirmcode uber »128« (in- 
verse Zeichen) ebenfalls nur 
den ASCII-Code furs norma- 
le Zeichen ergibt. 
(Knut Smoczyk/bl) 

C64 mit Rolladen 



Man kennt sie von vielen Be- 
nutzeroberflachen fur Com- 
puter (z.B Geos, die Work- 



spielprogramms pulldown- 
menue). Die Namen der 
Menupunkte sind als String- 
variablen definiert, die sich 
jederzeit nach Belieben an- 
dern lassen. Zur Wahl der 
Menupunkte dienen die 
Cursor-Tasten, mit < RE- 
TURN > ruft man die Funk- 
tion auf. Halten Sie sich bei 
eigenen Programmentwick- 
lungen moglichst exakt an 
die Zeilennumerierung des 
Demoprogramms - davon 
ist abhangig, ob die richtige 
Programmreaktion aufgeru- 
fen wird (die entsprechen- 
den Unterprogramme kon- 
nen ab Zeile 370 stehen). 
(Said Baloui/bl) 

Es geht abwurts 

Das Ein-Zeiler-Programm 
scroll n. unten greift die be- 
reits erwahnte Idee auf: 
Schreibt man eine Zeile auf 
den Bildschirm, die mehr als 
40 Zeichenspalten umfaBt, 
scrollen alle darunterste- 
henden Zeilen um eine nach 




[2] Der Bildschirm scrollt, wohin Sie wollen 



bench des Amiga usw.) Ge- 
meint sind die komfortablen 
Pull-down-Meniis, die in der 
obersten Bildschirmzeile ak- 
tiviert werden. Reverse 
Cursor-Balken lassen sich 
per Tastatur, Maus Oder Joy- 
stick auf den gewunschten 
Menupunkt bewegen, der 
dann aufgerufen wird. Unse- 
re Maschinenspracherouti- 
ne pull-down bietet alien 
Basic-Programmierern die 
Mbglichkeit, solche Menus 
in eigenen Programmen zu 
verwenden: Man muB ledig- 
lich die Assembler-Routine 
zu Programmbeginn laden 
(wie Zeile 90 unseres Bei- 



unten. Das Programm er- 
zeugt den Scroll-Vorgang 
kiinstlich: Es benutzt diver- 
se Cursor-Steuerzeichen 
und die Speicherstelle 218 
(aktuelle Bildschirmzeile). 
(Thomas Dreier/bl) 

Zahlenumrechnung 



Wer kennt auf Anhieb die 
entsprechende Hexzahl, die 
zu einem dezimalen Wert 
gehort? Noch mehr Kopfzer- 
brechen bereitet die Um- 
wandlung ins binare Zahlen- 
system (Dualzahlen). Unser 
Basic-Utility zahlenwandler 
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erledigt das kurz und bun- 
dig. 

Nach dem Programmstart 
bietet ein Menu folgende 
Moglichkeiten, die mit den 
entsprechenden Tasten auf- 
zurufen sind: 

- Hexadezimal als Dezimal- 
zahl, 

- Dezimalwert als Hexzahl, 

- Dezimal- als Dualzahl, 

- Binarwert in dezimaler 
Darstellung. 

Die Taste < E > beendet 
das Programm. Beachten 
Sie, daB bei der Eingabe fiir 
Dualzahlen (sie konnen nur 
aus den Ziffern »1« oder »0« 
bestehen) eine Eingabelan- 
ge von acht Stellen vorge- 
schrieben ist, z.B. muB die 
Zahl 15 so eingetippt wer- 
den: 00001111 (nur vier Ein- 
ser ohne Nullen genugen 
nicht!). Die umgewandelte 
Zahl erscheint revers unter 
der eingegebenen Zahl. Im 
Menu konnen Sie nun die 
nachste Zahlendarstellung 
auswahlen. Der Vorteil die- 
ses Programms liegt darin, 
daB man sich bei der Hex- 
oder Dezimalzahl nicht auf 
die maximalen Werte des 
8-Bit-Computers (0 bis 
65535) beschranken muB: 
Lediglich bei den Dualzah- 
len lassen sich nur Werte 
zwischen und 255 anzei- 
gen. 

(Martin und Hartmut Spra- 
ve/bl) 

Automatische Zei- 
lennumerierung 

Dieses auBerordentlich 
nutzliche Utility kennen die 
meisten nur als Basic-Erwei- 
terung in Maschinenspra- 
che: die automatische Vor- 
gabe der Basic-Zeilennum- 
mern. Mit einem Trick geht's 
auch in Basic 2.0 - und es er- 
fiillt denselben Zweck. 



Tabelle 2. Die Parameter von »Rolling« 



Syntax-Vorschrift: SYS 50550,r,za,ze,s,l 

r Richtung L,R,H,T 

za Zeilenanfang 1 bis 25 

ze Zeilenende Ibis 25, za<ze 

s Spalte 1 bis 40 

I Zeilenlange 1 bis 40, s + I < 41 



Wichtig: Die Routine au- 
to.bas besitzt sehr hohe Zei- 
lennummern (63990 und 
63991) und gibt eine Schritt- 
weite von »10« vor. Diese 
Zahl laBt sich in Zeile 63991 
andern (A+10). Sind Sie mit 
der Eingabe Ihres Basic- 
Programms fertig, mussen 
die beiden Zeilen der Auto- 
Routine wieder geloscht 
werden. 

. (Herbert Kunz/bl) 

Eingabehilfe fiir 
Einzeiler 



Dieses Programm 88 zei- 
chen macht Unmogliches 
moglich: Es lassen sich 
Basic-Zeilen bis zu maximal 
Lange von 88 Zeichen ein- 
geben! 

Nach RUN wird der Bild- 
schirm geloscht, der Cursor 
erscheint in der dritten Bild- 
schirmzeile. Darunter (Zeile 
4, Spalte 8) findet man den 
< Pfeil hoch>, der signali- 
siert: bis hierher und nicht 
weiter! Geben Sie nun eine 
uberlange Basic-Zeile bis 
exakt zu dieser Position ein. 
Mit < RETURN > wird sie 
ubernommen. Achtung: Ver- 
meiden Sie beim Ausprobie- 
ren die Nummer 1 als Zeilen- 
nummer (die beniitzt das Mi- 
niprogramm selbst!). Wie 
funktioniert's? Die wichtige 
Fortsetzungszeile mit acht 
Speicherstellen erzeugt die 
Betriebssystemroutine ab 
Adresse 59749. Der C 64 be- 
nutzt sie ebenfalls, wenn 40 
Zeichen in eine Bildschirm- 



Tabelle 1. Die Bits der Speicherstelle 1 



Bit.Nr. Zustand 

1 


1 1 


2 1 




Funktion 

Basic-ROM (40960 bis 49151)aktiv 
Basic-RAM eingeschaltet 
Kernel-ROM (57344 bis 65535) ein 
RAM unter Kernel ein 
l/O-Register (53248 bis 57343) ein 
Zeichensatz-ROM ein 



Die Bits 3 bis 5 kummern sich urn den Datasettenbetrieb, Nr. 6 und 7 werden nicht 
benutzt (immer »0«) 



spalte eingetragen wurden: 
Scrollen nach unten, nach- 
ste Zeile loschen. SYS 42112 
beendet ein Basic-Pro- 
gramm ohne READY-Mel- 
dung. Die entsprechenden 
Betriebssystemvektoren 
stehen in den Adresse 
770/771. 

(Jorg Peschel/bl) 



Als die Bilder lau- 
fen lernten 



Mit dem Programm rolling 
kann man Blockgrafik oder 
Text in Bildschirmbereichen 
scrollen lassen, die Sie frei 
wahlen diirfen. Und das in 
alle vier Richtungen! Das 
ermoglichst allerdings erst 
das Maschinensprachepro- 
gramm roll.obj, das vom 
Basic-Demo nachgeladen 
wird, ebenso wie der gean- 
derte Zeichensatz zs. Hin- 
weis: Es ist derselbe wie ga- 
me.char, allerdings mit an- 
derer Startadresse: $3000 
(12288). Damit konnen Sie 
innerhalb der PRINT-Zeilen 
des Demoprogramms mit 
den geanderten Zeichen 
(Mauersegmente, Fullmu- 
ster usw.) experimentieren. 
Zur Initialisierung braucht 
die Routine einige Parame- 
terangaben: 
SYS 50550,R,ZA,ZE,S,L. 

Es diirfen auch Variable 
sein. Was sie bedeuten, 
zeigt Tabelle 2. Achten Sie 
darauf, daB der Zeilenan- 
fang nie groBer als das Zei- 
lenende ist. AuBerdem darf 
die Summe aus Spaltenzahl 
und Zeilenlange den Wert 
»41« nicht iibersteigen. Un- 
reelle Zahlen fangt das Pro- 
gramm mit einer Fehlermel- 
dung ab. Experimentieren 
Sie mit dem Beispielpro- 
gramm rolling (Abb.2). Die 
SYS-Aufrufe der einzelnen 
Bildschirmbereiche stehen 
in den Zeilen 50 bis 90. 

(J. Effenberg/bl) 



Superschnelles 
Directory in Basic 

Es muB nicht immer Maschi- 
nensprache sein: Mit dem 
Basic-Programm dir.bas 
kommt das Disketteninhalts- 
verzeichnis ebenso schnell 
auf den Bildschirm wie mit 
unzahligen, vergleichbaren 
Assembler-Routinen. Das 
ist der Trick: Die Tastatur 
wird als Standard-Eingabe- 
gerat fur die geoffnete Dis- 
kettendatei angegeben: Se- 
kundaradresse 0. Jetzt kom- 
men die Zeichen nicht mehr 
iiber das langweilige 
GET#, sondern durch den 
normalen GET-Befehl, der 
gewohnlich Zeichen von der 
Tastatur einliest. 

(Olaf Kummer/bl) 

Restore X in Basic 



Das Utility goto x auf der 
Diskette zum Sonderheft be- 
sitzt auch die Funktion -Re- 
store X« (X = beliebige Zei- 
lennummer oder numeri- 
sche Variable). Nicht ganz 
so komfortabel, uberdies ar- 
beitsaufwendiger, aber nicht 
weniger effektiv laBt sich die- 
se Aufgabe auch in Basic er- 
fiillen. Dazu brauchen wir ei- 
nige Adressen aus der Zero- 
page: 65/66 (Speicherzellen 
des aktuellen DATA-Ele- 
ments) und 122/123 (Basic- 
Zeiger auf den nachsten Be- 
fehl innerhalb der Unterrou- 
tine). Pro Lesevorgang fiir 
die DATA-Zeilen benotigen 
Sie ein separates Unterpro- 
gramm zum Einlesen der 
Daten. POKEt man die Wer- 
te von 122/123 in die Spei- 
cherstelle 65/66, macht das 
Programm bei dem Wert 
weiter, der auf die Basic- 
Zeile mit den POKEs folgt: 
beim ersten DATA-Element 
im Unterprogramm (aber 
nicht im Gesamtprogramm, 
darauf kommt's an!). Nach 
dem Rucksprung aus der 
DATA-Unterroutine muB 
man auch die Zeiger im 
Hauptprogramm wieder re- 
gulieren. Unser Beispielli- 
sting restore.bas ruft drei 
solcher Daten-Unterpro- 
gramme in zufalliger Rei- 
Fortsetzung Seite 50 
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Komfortabler geht 
es fast nicht mehr: 
Hires, Multicolor 
und natiirlich Spri- 
tes sind nur ein Vor- 
zugdieserSuper-Er- 
weiterung. Aber 
auch die Blockgra- 
fik kommt nicht zu 
kurz. Und damit die 
Programme nicht 
zu lang werden, 
gibt's jede Menge 

strukturierender 
Befehle. 

von JensSchwarz 

Sie sind uberall bekannt, 
die kleinen auf dem Bild- 
schirm umherhuschen- 
den Wesen, Sprites genannt. 
Sie hiipfen uber Treppen, 
verfolgt von gierigen Mon- 
stern, iiberwinden Schluch- 
ten und sind trotz grausam- 
ster Tode bei jedem Spielbe- 
ginn wieder lebendig und ta- 
tenbereit. Wen juckt es da 
nicht in den Fingern, eige- 
nen Kreaturen Leben einzu- 
hauchen? Leider ist dies mit 
dem normalen Betriebssy- 
stem des C64 nicht ganz so 
einfach, wie es spater im fer- 
tigen Werk aussieht. Eine tie- 
fe Kenntnis des Betriebssy- 
stems und seiner Hardware- 
komponenten ist Grundlage, 
urn im normalen Basic auch 
nur an die Entstehung eines 
Sprites zu denken. Was tun? 
Greifen Sie zu unserer Er- 
weiterung, zu »Sprite+Gra- 
fik-Basic«. Allein fur Sprites 
gibt's 32 neue Befehle. Au- 
Ber den ublichen Funktio- 
nen, die ein Sprite entstehen 
lassen, sind die tollsten Para- 
meter, wie Spiegeln, Drehen 
und vieles mehr kein Pro- 
grammieraufwand mehr. 
Durch vielseitige Befehle zur 
Sprite-Erzeugung kann 
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selbst der blutigste Laie oh- 
ne zusatzlichen Editor seine 
Computerwesen erschaffen. 
Die Sprite-Blocke (max. 144) 
benotigen selbstverstandlich 
keinen Basic-Speicher. 

Aber auch fur den richti- 
gen Bildschirmhintergrund 
stehen 14 neue Befehle pa- 
rat. Scrollen in vier Richtun- 
gen und Auffullen mit beliebi- 
gen Zeichen wird zum Kin- 
derspiel. 

Naturlich gibt es jede Men- 
ge neuer Befehle fur hoch- 
auflosende und Multicolor- 
Grafik. Mit Ihnen erzielen Sie 
Ergebnisse, die man sonst 
nur in professionellen Pro- 
grammen sieht: 

Punkte setzen oder 16- 
schen, Linien Ziehen, Ellip- 
sen und Ellipsenbogen, Ra- 
dien, Rechtecke und Blocke 
lassen sich mit einfachsten 
Befehlen definieren. Eine 
Besonderheit ist dabei her- 
vorzuheben - der GPRINT- 
Befehl. Er ermoglicht anna- 
hernd so komfortabel wie 
»PRINT«, Texte in Grafiken zu 
plazieren. Naturlich lassen 
sich die Grafiken laden und 
speichern. 

Fur ubersichtliche Pro- 
grammstrukturen sind zehn 
neue Befehle zustandig. Sie 
sind allesamt aus hoheren 
Basic-Dialekten bekannt: 

REPEAT ... UNTIL, CASE 
...THEN ...ELSE und Label- 
gebundene Sprungbefehle. 
Damit sich diese platzspa- 
rend und einfach in Ihr Pro- 
gramm einbinden lassen, 
gibt's 20 weitere Befehle - 
zum Editieren oder Suchen 
nach Zeichenketten, zeilen- 
weisen Abspeichern oder 
sogar zum Nachladen von 
Programmen. 

Wenn Sie nun Ge- 
schmack an dieser Erweite- 
rung gefunden haben, soil- 
ten Sie die beiliegende Dis- 
kette ins Laufwerk einlegen 
und mit 

L0AD"S+G-BASIC",8 



das Programm laden. Da- 
nach starten Sie mit RUN. 
Eine Einschaltmeldung zeigt 
Ihnen die Aktivierung der Be- 
fehlserweiterung. Danach 
stehen Ihnen die folgenden 
Befehle zusatzlich zur Ver- 
fugung: 

Befehle fiir Blockgrafik 
... erlauben bei normaler 
Bildschirmauflosung von 25 
Zeilen x 40 Zeichen die kom- 
fortable Ausgabe von Zei- 
chen und Zeichenketten. 
Dabei sind x- (x-Achse) Wer- 
te von bis 39, fur y (y- 
Achse) bis 24 erlaubt. Fur 
Farben (f) sind die im Hand- 
buch beschriebenen Farb- 
nummern bis 15 zulassig. 
Ein Zeichen (c) entspricht 
den ASCII-Werten bis 255. 
AT x,y, string 

Gibt einen String an der 
Bildschirmposition x, y aus. 
SET c,f,x,y 

Setzt ein Zeichen (ASCII- 
Code c) mit der Farbe (f) an 
die Position x,y. 
FSET f,x,y 

Andert die Farbe (f) eines 
Zeichens an der Bildschirm- 
position x,y. 
ZSET c,x,y 

Gibt das Zeichen c an der 
Position x,y aus. 
COLOUR rf.hf 

Setzt Rahmenfarbe (rf) 
und Hintergrundfarbe. 
CURSOR f 

Andert die Farben der 
nachfolgenden Print-Befeh- 
le auf den Wert »f« 
FILLx1,y1,x2,y2,c,f 

Fullt eine Flache von links 
oben x1,y1 bis x2,y2 mit 
dem Zeichen »c« und der 
Farbe »f«. 
ZFILLx1,y1,x2,y2,c 

Funktioniert wie »FILL«, 
nur wird die Zeichenfarbe in 
ihrem Originalwert belas- 
sen. 
INVx1,y1,x2,y2 

Invertiert alle Zeichen im 
angegebenen Bereich. Das 
heiBt die Zeichen erschei- 
nen dunkel auf hell, wenn 
sie vorher hell auf dunkel 
waren und umgekehrt. 



FFILLx1,y1,x2,y2 

Farbt den angegebenen 
Zeichenbereich mit der ak- 
tuellen Zeichenfarbe 
UPx1,y1,x2,y2 

Scrollt den angegebenen 
Bereich nach oben. Mit 
»DOWN« wird nach unten, 
mit »LEFT« nach links und 
mit »RIGHT« nach rechts 
gescrollt. 
FLASH-Befehle 

... machen farbliche Be- 
reiche durch Blinken (Farb- 
vertauschen) kenntlich. Urn 
diese Funktion in Betrieb zu 
nehmen, muB zuerst auf ei- 
ne neue IRQ-Routine umge- 
schaltet werden. Dabei sind 
fur die Farben (f1 bis f3) die 
im Handbuch beschriebe- 
nen Farbnummern bis 15 
erlaubt. Die Blinkgeschwin- 
digkeit (speed) wird in 1/10 
sek. zwischen 1 und 255 ge- 
schaltet. 
VEC 

Schaltet auf die neue 
Interrupt-Routine urn. 
OLDVEC 

Wechselt zuruck zum al- 
ten IRQ. Die neue Routine 
benotigt eine gewisse Aus- 
fuhrungszeit. Daher sollte 
nach Beendigung der Flash- 
Befehle grundsatzlich mit 
»OLDVEC« zuruckgeschal- 
tet werden. 
BFLASH f1,f2,speed 

Der Rahmen wechselt 
standig zwischen den Far- 
ben f1 und f2 mit der Blink- 
geschwindigkeit speed. 
GFLASH f1,f2,speed 

Funktioniert wie 

»BFLASH«, nur wechselt der 
Bildhintergrund. 
BGFLASH f1,f2,speed 

Entspricht »BFLASH«, je- 
doch wechseln Hintergrund 
und Bildhintergrund. 
FOFF 

Schaltet B/G/BGFLASH 
wieder aus. 
FLASH fl,f2,f3 

Invertiert die Zeichen mit 
den Farben f1,f2 und f3 in 
standigem Wechsel. 
OFF 

»FLASH« wird ausge- 
schaltet. Eine der Farben f1, 
f2 oder f3 bleibt erhalten. 



Sprite-Befehle 

... erlauben die komforta- 
ble Behandlung von Sprites. 
Als »adresse« wird dabei die 
Anfangsadresse des Sprite- 
Zeigers bezeichnet (32768+ 
(64 x Spriteblock)). Zu Verfu- 
gung stehen Block 16 bis 31, 
und falls Sie keine hochauf- 
losende Grafik bearbeiten, 
zusatzlich Block 128 bis 255. 
Die Sprite-Nummer (sn) be- 
zeichnet das eingeschaltete 
Sprite. Da der C64 max. 
acht Sprites zulaBt, sind die 
Nummern bis 7 erlaubt. 
SCLR adresse 

Loscht einen Spriteblock 
ab »adresse«. 
SRVS adresse 

Invertiert den Spriteblock 
(adresse). 

BMOVE adressel, adres- 
se2 

Kopiert Spriteblock 1 in 
Spriteblock 2. 
SONsn 

Schaltet das Sprite mit der 
Nr. »sn« ein. 
SOFF sn 

Schaltet das Sprite »sn« 
aus. 
SBLOCK sn,block 

Weist dem Sprite (sn) die 
Blocknummer (block) zu. 
SMODE sn, modus 

Das Sprite »sn« ist mit 
»modus = 0« in Multicolor, 
mit »1« normal dargestellt 
SCOLOURsn.fl 

Das Sprite »sn« erhalt die 
Farbe »f1« (0 bis 15). 
MCOLOUR f2,f3 

Teilt alien Multicolor- 
Sprites gemeinsam die Far- 
ben »f2« und »f3« zu. 
SPRIOR sn, modus 

Erteilt die Hintergrund- 
prioritat (modus) fur das 
Sprite »sn«. Zwei Werte sind 
dabei erlaubt: 

»0« - das Sprite liegt uber 
dem Hintergrund (Blockgra- 
fik oder Hires). 

»1« - der Hintergrund er- 
scheint uber einem Sprite. 
XEXP sn, modus 

»1« als Modus vergroBert 
das Sprite »sn« in der x- 
Achse (Breite), »0« schaltet 
auf normale GroBe. 
YEXP sn, modus 

Funktioniert wie »XEXP«, 
gilt aber fur die Hohe. 
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SSET sn,x,y 

Setzt das Sprite »sn« an 
die Position x (horizontal, 
bis 511) und y (vertikal, bis 
255). 
SUP sn,sw 

Bewegt das Sprite »sn« 
urn die Schrittweite »sw« (0 
bis 255) nach oben (up). 
SDOWN sn,sw 

Funktioniert wie »SUP«, 
bewegt aber nach unten. 
SLEFT sn,sw 

Entspricht »SUP«, die 
Richtung ist links. 
SRIGHT sn,sw 

Hat die gleichen Parame- 
ter wie »SUP«, bewegt aber 
nach rechts. 

SPLOT adresse,x,y,modus, 
zm 

In den Speicherblock mit 
»adresse« (32768+(64 x 
Sprite-Block)) wird an der x- 
Koordinate (multicolor bis 
11, normal bis 23) und y- 
Koordinate (0 bis 20) ein 
Punkt geloscht, gesetzt Oder 
invertiert. Dabei muB in "mo- 
dus* angegeben werden, ob 
es in multicolor (1) oder nor- 
mal (0) konstruiert ist. »zm« 
.bezeichnet den Zeichenmo- 
dus: 



Zeichen 


normal 


multicolor 


A 


setzen 


Farbe f1 setzen 


B 


keine Anderung 


Farbe f2 setzen 


C 


- 


Farbe f3 setzen 


D 


- 


keine Anderung 




Ibschen 


loschen 


i 


invertieren 


invertieren 



tzm 


normal 


multicolor 


to 


loschen 


loschen 


t1 


setzen 


Farbe f1 setzen 


t2 


invertieren 


Farbe f2 setzen 


t3 


~ 


Farbe f3 setzen 



Befehle fur 

komfortable 

Sprite-Behandlung 



komfortable Sprite-Be- 
handlung 

DESIGN adresse,y,modus, 
string 

Ermoglicht die zeilenwei- 
se Konstruktion eines Spri- 
tes ab »adresse«. Mit »y« (0 
bis 20) wird die Zeile ge- 
kennzeichnet, und »modus« 
bezeichnet die Sprite-Art (0 
=, normal, 1 = multicolor). 
In »string« wird die Zeichen- 
matrix definiert. Wenn Sie 
»string« direkt hinter den Be- 
fehl schreiben, muB er in 
GansefuBchen stehen, an- 
sonsten laBt sich eine String- 
Variable verwenden (z.B. 
A$). Im Normalmodus sind 
24 Zeichen gefordert, bei 
multicolor zwolf. Dabei sind 
folgende Zeichen verein- 
bart: 



SCORDsn,v1,v2 

Obergibt die Bildschirm- 
position von Sprite »sn« (0 
bis 7) an v1 (x-Koordinate) 
undv2(y-Koordinate). Furvl 
und v2 miissen nichtindi- 
zierte, reelle Variablen ein- 
gesetzt werden, beispiels- 
weise A, B, C1 usw. Nicht er- 
laubt sind z.B. A%, A(0), A$ 
usw. 

SMOVEsn,x1,y1,x2,y2, 
sw,s 

Bewegt ein Sprite (sn) 
vom Ausgangspunkt (x1,y1) 
zu den Koordinaten x2 und 
y2 in der Schrittweite »sw« (1 
bis 255). Die Geschwindig- 
keit (s) darf dabei Werte von 
1 bis 255 annehmen (1 = 
schnell, 255 = langsam) 
MOVETO sn,x,y,sw,s 

Funktioniert wie »SMO- 
VE«, nur wird von der derzei- 
tigen Position bis zu x und y 
bewegt. 
RRIGHT adresse 

Scrollt die Sprite-Matrix 
ab »adresse« nach rechts. 
RLEFT adresse 

Entspricht »RRIGHT«, hat 
aber die Scroll-Richtung 
links. 
RUP adresse 

Funktioniert wie 

»RRIGHT«, die Scroll- 
Richtung ist aufwarts. 
RDOWN adresse 

Die »adresse« ist wie bei 
»RRIGHT«, die Scroll-Rich- 
tung aber abwarts. 
XMIR modus.adresse 

Spiegelt die Sprite-Matrix 
ab »adresse« in x-Richtung. 
Mit »modus« muB mitgeteilt 
werden, ob das Sprite im 
Multicolor- (1) oder im Nor- 
malmodus (0) gespiegelt 
wird. 
XMIR adresse 

Eine Sprite-Matrix ab 
»adresse« wird in y-Richtung 
gespiegelt. 
TURN modus.adresse 

Dreht die Sprite-Matrix ab 
»adresse« urn 180 Grad. 
Auch hier muB im »modus« 
mitgeteilt werden, ob das 
Sprite multicolor (1) oder ein- 
farbig (0) ist. 
ROTR adresse 

Rotiert einen Sprite-Block 
urn 90 Grad nach rechts. 



Achtung: Funktioniert nur 
fur einfarbige Sprites, arbei- 
tet nicht in multicolor. 
ROTL adresse 

Dreht einen Sprite-Block 
urn 90 Grad nach links. Ach- 
tung: Funktioniert nur fur 
einfarbige Sprites, arbeitet 
nicht zusammen mit Multi- 
color. 
DETECT modus 

Setzt die Kollisionsregi- 
ster zuruck. Bei modus = 
wird das Sprite-Sprite-, bei 
modus = 1 das Sprite-Hin- 
tergrundregister zuruckge- 
setzt. Die Abfrage der Kolli- 
sionen finden Sie unter 
»Funktionen (CHECK)«. 
Befehle fur die hoch- 
auflosende Grafik 

... behandelt sowohl 
Hires- als auch Multicolor- 
Grafik. Dabei sind folgende 
Werte erlaubt: 

Hires-Grafik Multicolor-Grafik 

x-Achse, bis 319 x-Achse, bis 159 
y-Achse, bis 199 y-Achse, bis 199 

Werte, die uber diesen 
Bereich hinausgehen, wer- 
den ignoriert. Fur den Zei- 
chenmodus (zm) ist folgen- 
des vereinbart: 



»zm« 


Hires-Grafik 


Multicolor-Grafik 





Ibschen 


loschen 


1 


setzen 


Farbe f1 setzen 


2 


invertieren 


Farbe f2 setzen 


3 


- 


Farbe f3 setzen 


4 


~ 


invertieren 



Wenn Sie Sprites zusam- 
men mit Multicolor und Hi- 
res verwenden, durfen die 



Blocks 128 bis 255 (40960 
bis 49088) nicht verwendet 
werden. Die Sprites liegen 
genau im Grafikspeicher 
und wiirden am Bildschirm 
ein wirres Pixelmuster er- 
zeugen. 
HRG pf,hf 

Schaltet die hochauflo- 
sende Grafik ein und setzt 
Punktfarbe (pf) und Hinter- 
grundfarbe (hf). 
NRM 

Wechselt auf normale 
Blockgrafik/Text zuruck. Da- 
bei wird der Bildschirm ge- 
loscht und die Hintergrund- 
und Rahmenfarbe wie bei 
< RUN/STOP RESTORE> 
gesetzt. 
CLS 

Loscht den Grafikbild- 
schirm und setzt die Farben 
wie unter »HRG« festgelegt. 
MULTI f1,f2,f3 

Der Multicolor-Modus 
wird eingeschaltet mit den 
Farben f1,f2 und f3 (Obis 15, 
siehe Handbuch). 
MODE zm 

Stellt den Zeichenmodus 
(zm) ein (siehe oben). Dieser 
ist fur alle nachfolgenden 
Grafikbefehle giiltig. 
PLOT x,y 

Setzt einen Punkt an die 
Koordinaten x (horizontal) 
und y (vertikal). 
DRAW x,y 

Zieht eine Linie vom zu- 
letzt gesetzten Punkt zu den 
Koordinaten x und y. 



ASCII-Code 


Tastenkombination 


Funktion 


1 


CTRL + A 


SchriftgroBe in x-Richtung +1 


2 


CTRL+ B 


SchriftgroBe in x-Richtung —1 


3 


CTRL + C 


SchriftgroBe in y-Richtung +1 


4 


CTRL + D 


SchriftgroBe in y-Richtung —1 


22 


CTRL + V 


Cursor 1 Pixel nach links 


16 


CTRL + P 


Cursor 1 Pixel nach rechts 


15 


CTRL+ O 


Cursor 1 Pixel nach oben 


21 


CTRL+ U 


Cursor 1 Pixel nach unten 


157 


SHIFT + CRSR Ir 


Cursor left 


29 


CRSR Ir 


Cursor right 


145 


SHIFT + CRSR ud 


Cursor up 


17 


CRSR ud 


Cursor down 


19 


HOME 


Cursor home 


147 


CLR/HOME 


siehe CLS 


13 


CTRL + M 


Carriage Return 


14 


CTRL + N 


Umschaltung Kleinbuchstaben 


142 


keine 


Umschaltung GroBbuchstaben 


18 


CTRL RVSON 


RVSon 


146 


CTRL RVSOFF 


RVS off 


6 


CTRL+ F 


Zeichenmodus 


7 


CTRL + G 


Zeichenmodus 1 


10 


CTRL + J 


Zeichenmodus 2 


11 


CTRL + K 


Zeichenmodus 3 


12 


CTRL + L 


Zeichenmodus 4 



Tabelle 1. Die Steuerzeichen unter »GPRINT« 
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LINEx1,y1,x2,y2 

Zeichnet eine Linie von 
der x- und y-Position (x1,y1) 
bis zu den Koordinaten x2, 
y2. 
RECx1,y1,x2,y2 

Erzeugt ein Rechteck mit 
der linken oberen Ecke x1, 
y1 und der rechten unteren 
Ecke x2, y2. 
BLOCK x1,y1,x2,y2 

Funktioniert wie »REC«, 
nur wird das Rechteck aus- 
gefullt. 
ANGL x,y,rx,ry,w 

Zeichnet eine Gerade, die 
dem Radius einer Ellipse mit 
dem Startpunkt »x, y«, der 
Breite »rx« und der Lange 
»ry« entspricht. Der Winkel 
(w) ist vom Mittelpunkt der 
Ellipse aus festgelegt. 
ARC x,y,rx,ry,sw,ew,a 

Erzeugt einen Ellipsenbo- 
gen mit dem Mittelpunkt »x, 
y«, der Breite »rx« und der 
Lange »ry«. Zusatzlich mus- 
sen Startwinkel (sw) und 
Endwinkel (ew) angegeben 
werden (0 bis 360 Grad). Der 
Winkelabstand (a) der be- 
rechneten Punkte (1 bis 360 
Grad) hat EinfluB auf die Zei- 
chengeschwindigkeit und 
Glattung. Mit groBeren Win- 
keln lassen sich Polyeder 
konstruieren. 
GPRINT string 

Gibt einen in »string« ent- 
haltenen Text am Grafikbild- 
schirm aus. SchriftgroBe, 
Zeichensatz, Farbe und 
Cursor-Steuerung lassen 
sich durch Steuerzeichen 
beeinflussen (Tabelle 1). 
GSAVE gn.name 

Speichert die hochaufld- 
sende Grafik auf das Gerat 
mit der Nummer »gn« unter 
dem Namen »name«. 
GLOAD gn,name 

Ladt hochauflosende Gra- 
fik vom Gerat mit der Num- 
mer »gn« und mit dem Na- 
men »name«. 
Achtung: 

Bei alien LOAD/SAVE- 
Vorgangen werden die Para- 
meter von GPRINT zerstort. 
Ein Blinken der Floppy-LED 
ist normal. Bei manchen 
Floppies laBt sich der 
LOAD/SAVE-Befehl nicht im 
Programmodus anwenden. 
Der Name ist bei der direk- 
ten Anweisung in GansefuB- 
chen zu setzen. 
Editorbefehle 

... dienen zur einfacheren 



dez.-adr. 




hex.-ad 


r. 


Belegung 


0- 


- 1024 


0000- 


-0400 


wie im Handbuch beschrieben 


1025- 


-28671 


0401- 


-6FFF 


Basic-RAM 


28672- 


-32767 


7000- 


-7FFF 


Editor- und Strukturbefehle 


32768- 


-33791 


8000- 


-83FF 


Video-Ram (Bildschirm) 


33792- 


-34815 


8400- 


-87FF 


Spriteblocke 16 bis 31 


34816- 


-40959 


8800- 


-9FFF 


Blockgrafik- und Spritegrafik- 
befehle 


40960- 


-49151 


A000- 


-BFFF 


HRG 


49152- 


-53247 


cooo- 


-CFFF 


HRG-Befehle 


53248- 


-57343 


D000- 


-DFFF 


keine Veranderungen 


57344- 


-59392 


E000- 


-E7FF 


Speicher fur Farben der HRG 



Tabelle 2. Die Speicherbelegung 



Eingabe von Programmen. 
Sie sollten, obwohl auch im 
Programm anwendbar, nur 
im Direktmodus gebraucht 
werden. Die meisten dieser 
Befehle beenden ein beste- 
hendes Programm mit 
»READY«. 
FKEY fn,string 

Weist einer Funktionsta- 
ste (fn) eine Zeichenkette 
(string) mit max. 20 Zeichen 
zu. Die Funktionstasten 
neun bis zwolf sind uber die 
CBM-Taste erreichbar. Be- 
vor Sie diese Funktion errei- 
chen, muB der IRQ mit 
»VEC« aktiviert werden. 
DISP 

Gibt die Belegung der 
Funktionstasten aus. 
PAGE zn 

Listet zehn Basic-Zeilen 
nach der Zeilennummer 
»zn«. 
MOVE 

Die nachsten zehn Basic- 
Zeilen (nach »PAGE«) wer- 
den am Bildschirm ausge- 
geben. 
BACK 

Gibt zehn Zeilen vor den 
zuletzt angezeigten aus. 
OLD 

Ein durch »NEW« ge- 
loschtes Programm wird 
wieder aktiviert. 
DUMP 

Gibt die Inhalte aller Varia- 
blen aus und zeigt die Funk- 
tionsnamen selbstdefinier- 
ter Funktionen an. Sie wer- 
den durch »!« gekennzeich- 
net. 
ARRAY v 

Zeigt den Inhalt aller Ele- 
mente des Feldes »v« am 
Bildschirm an. 
MEM 

Zeigt die momentane 
Speicherbelegung an. 
MERGE name,gn 

Ladt das Programm »na- 
me« vom Gerat »gn« und 



hangt es an ein bestehen- 
des. Die Zeilennummern 
des schon vorhandenen Ba- 
sics mussen niedriger sein 
als die des nachgeladenen. 
ZSAVE gn,name,z1,z2 

Speichert einen Pro- 
grammteil auf das Gerat 
»gn« unter der Bezeichnung 
»name«. Dabei werden nur 
die Zeilennummer »z1« bis 
»z2« berucksichtigt. 
ZLOAD z,name,gn 

Ladt ein Programm, das 
unter »name« auf dem Gerat 
»gn« gespeichert sein muB, 
und fiigt es ab der Zeile »z« 
im Computer an. Alle bisher 
auf »z« folgenden Nummern 
gehen dabei verloren. 
DELz1,z2 

Loscht ein Programm von 
Zeilennummer z1 bis z2. 
HELP 

Gibt alle Basic-V-2.0-Be- 
fehle aus 
©HELP 

Erzeugt eine Liste aller 
G + B-Basic-Befehle. 
FIND Zeichenfolge 

Zeigt die Nummern der 
Zeilen an, in denen die Zei- 
chenfolge enthalten ist. Wer- 
den die gesuchten Zeichen 
nicht in GansefuBchen ge- 
setzt, sucht der Befehl nur 
nach den entsprechenden 
Variablen. Basic-Befehle 
werden nicht gefunden. 
AUTO zn,a 

Fur die Basic-Eingabe er- 
folgt eine automatische Zei- 
lenvorgabe mit der ersten 
Nummer »zn« und der 
Schrittweite »a«. Ist die vor- 
gegebene Zeile schon im 
Programm, farbt sich der 
Bildschirmrahmen rot, an- 
sonsten blau. 
TRACE 

In der obersten Bild- 
schirmzeile wird die aktuelle 
Programmnummer ange- 
zeigt und der aktuelle Befehl 



revers gekennzeichnet. Die- 
ser Befehl wird erst nach Ta- 
stendruck abgearbeitet. 
RETRACE 

Schaltet den »TRACE«- 
Modus aus. 
ERROR 

Gibt den zuletzt aufgetre- 
tenen Fehler und die dazu- 
gehorige Zeile aus. 
COLD 

Startet Sprite+Grafik- 
Basic neu. 

Strukturierende Be- 
fehle 

... machen Programme 
ubersichtlicher und einfa- 
cher. Bei konsequenter An- 
wendung lassen sich Pro- 
gramme wesentlich verkur- 
zen. 

REPEAT: ... :UNTIL Bedin- 
gung 

Fuhrt die auf REPEAT fol- 
genden Anweisungen so- 
lange durch, bis die auf UN- 
TIL folgende Bedingung er- 
fullt ist. 

CASE Bedingung THEN ... 
:ELSE ... 

Ist die Bedingung erfullt, 
werden die Befehle nach 
THEN ausgefuhrt. Im ande- 
ren Falle folgen die Befehle 
nach ELSE. 
AGAIN ... :ELSE ... 

War die Bedingung nach 
der letzten Anweisung rich- 
tig, wird zwischen AGAIN 
und ELSE abgearbeitet, 
sonst nach ELSE. 
JUMP label 

Springt an die durch "la- 
bel" gekennzeichnete Pro- 
grammstelle. »label« darf ei- 
ne beliebige Zeichenkette 
sein. 
LABEL label 

Kennzeichnet einen Pro- 
grammaufruf durch »JUMP« 
Oder »CALL«. Trifft das Pro- 
gramm ohne JUMP- oder 
CALL-Aufruf auf ein LABEL, 
wird der nachste Befehl ab- 
gearbeitet. 
CALL label 

Ruft ein Unterprogramm 
des namens »label« auf. Es 
muB mit SUBEND beendet 
werden. 
SUBEND 

Das mit CALL aufgerufe- 
ne Unterprogramm wird wie- 
der verlassen, und es wird 
der Befehl nach CALL abge- 
arbeitet. 
Funktionen 

... ubertragen Parameter 
in Variablen und machen lo- 
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gische Abfragen nach Ereig- 
nissen moglich. In der Be- 
schreibung wird »A=«, also 
die Ubergabe an eine nume- 
rische Variable, gezeigt. Na- 
turlich sind alle anderen Va- 
riablennamen erlaubt (z.B. 
B, C1, DD usw.). Ebenso 
sind logische Vergleiche (IF 
... THEN) und Programm- 
sprunge (ON ... GOTO/GO- 
SUB) erlaubt. 
A=XCORD(0) 

Holt die x-Koordinate in 
die Variable A. 
A=YCORD(0) 

Bringt die y-Koordinate in 
die Variable A. 
A=CODE(x)y 

Ubertragtden Bildschirm- 
code des Zeichens an der 
Position x,y in die Variable 
»A«. 
A=FARB(x)y 

Nach Ausfuhrung dieser 
Funktion befindet sich der 
Farbcode des Zeichens an 
der Position x,y in der Varia- 
blen »A«. 
CHECK(0)sn1,sn2 

Uberpruft das Kollisions- 
register Sprite/Sprite auf Be- 
ruhrung zweier Sprites (sn1 
und sn2). Verwendet wird 
diese Funktion beispiels- 
weise: 

A = CHECK(0)0,1 

Das Ergebnis der Aus- 
wertung des Kollisionsregi- 
sters zwischen Sprite und 
Sprite 1 wird der Variablen 
»A« ubergeben. 

Der Wert der Variablen 
ist: 

»0« die Sprites beruhren 
sich nicht, 

»1 « die Sprites kollidieren. 
CHECK(1)sn 

Das Kollisionsregister 
Sprite/Hintergrund wird auf 
die Beruhrung Sprite/Hin- 
tergrundzeichen uberpruft. 

Als Ergebnis erhalten Sie 
»0« fur keine Beruhrung 
Oder »1« fur Kollision. 
A = TEST(0)x,y 

Pruft, ob ein Punkt in der 
hochauflosenden Grafik ge- 
setzt ist. Das Ergebnis in der 
Variablen (A) entspricht 
dem Zeichenmodus. 
A = STICK(n) 

Holt die Stellung des Joy- 
sticks in die Variable »A«. 
Als Werte sind moglich: 



rechts 


8 


oben links 


5 


oben rechts 


9 


unten links 


6 


unten rechts 


10 


Feuer 


Richtung+ 




16 



Ereignis 


Wert 


oben 


1 


unten 


2 


links 


4 



Fehlermeldungen 

Da der Wortschatz von 
»Sprite+Grafik-Basic« be- 
deutend umfangreicher ist 
als der des Basic V 2.0, wur- 
de es unumganglich, auch 
zusatzliche Fehlermeldun- 
gen mit einzubauen: 
UNTIL WITHOUT REPEAT 

Tritt dann auf, wenn der 
Computer ohne vorausge- 
gangenes REPEAT auf den 
Befehl UNTIL trifft. 
LABEL NOT FOUND 

Der Interpreter findet den 
LABEL-Namen nicht, auf 
den verzweigt werden soil. 
SUBEND WITHOUT CALL 

Ein Rucksprung mit SUB- 
END ist nur moglich, wenn 
dieses Unterprogramm mit 
CALL aufgerufen wird. 
ILLEGAL SPRITE NUM- 
BER 

Es sind nur die Sprite- 
Nummern bis 7 erlaubt. Ist 
der Wert hoher, erscheint 
diese Fehlermeldung. 
ILLEGAL SPRITE STRING 

Hier enthalt der String des 
DESIGN-Befehlseinen Feh- 
ler. Beachten Sie, daB nur 
bestimmte Zeichen erlaubt 
sind. 

SPRITE DESIGNING 

COORDINATE 

Tritt auf, wenn beim Befehl 
SPLOT falsche x/y- 
Koordinaten angegeben 
werden. 
Besonderheiten 

Beim FILL/ZFILL/FFILL- 
Befehl (siehe Blockgrafik) ist 
die linke obere Ecke bin- 
dend vorgeschrieben. Wird 
an einem anderen Punkt be- 
gonnen, sturzt der Compu- 
ter unweigerlich ab. 

TRACE vertragt sich nicht 
mit den anderen Interrupt- 
Befehlen (VEQOLDVEC, 
B/G/BG und FLASH). Der 
Grund dieser Unvertraglich- 
keit liegt in der Umlenkung 
bei TRACE in einen Raster- 
IRQ. Er sorgt dafur, daB im- 
mer die obersten drei Zeilen 
in Blockgrafik angezeigt 
werden. DruckenSiezurAb- 
hilfe nach Beendigung der 
Fehlersuche mit TRACE die 
Tasten < RUN/STOP RE- 
STORE >. 



Dereingebaute Raster-In- 
terrupt laBt sich auch ohne 
TRACE von Ihnen nutzen. 
Er wird mit SYS31851 akti- 
viert. Zuvor miissen Sie in 
die Speicherstellen 31889 
und 31903 jeweils die Ra- 
sterzeile POKEn (0 bis 255), 
ab der auf die hochauf losen- 
de Grafik geschaltet werden 
soil. AuBerdem muB in der 
Speicherstelle 31929 die Ra- 
sterzeile enthalten sein (0 
bis 255), ab der wieder auf 
den Textmodus zuruckge- 
schaltet wird. Ein Ausschal- 
ten ist durch »NRM« oder 
< RUN/STOP RESTORE > 
moglich. 

Im TRACE-Modus ist der 
Befehl GET nicht mehr funk- 
tionsfahig, da standig der 
letzte Tastendruck geloscht 
wird. Beachten Sie dies bei 
der Fehlersuche. 

Die Funktion TEST setzt 
zusatzlich den Grafik-Cur- 
sor. Dam it laBt sich vor 
GPRINT der Cursor auf die 
gewunschte Position brin- 
gen. 

Verwenden Sie niemals 
@ohne Zusatze. Der Com- 
puter kann absturzen. Das 
gleiche kann passieren, 
wenn Sie bei Befehlen einen 
oder mehrere Parameter 
vergessen. 

Beim Speichern eines 
Hires-Bildes auf Diskette, 
beginnt die Floppylampe zu 
blinken, und die Farbinfor- 
mation geht verloren. 

Bei einer Fehlermeldung 
wird zusatzlich die zuletzt 
abgearbeitete Zeile gelistet. 
Der Befehl, bei dem der In- 
terpreter aufgehort hat, zu 
arbeiten, wird invertiert dar- 
gestellt. Dadurch laBt sich in 
den meisten Fallen der Feh- 
ler schneller rekonstruieren. 

Beachten Sie auch die ge- 
genuber dem normalen Be- 
triebssystem geanderte Spei- 
cherbelegung (Tabelle 2). 
Sie macht trotz des erweiter- 
ten Befehlssatzes den gro- 



Ben Basic-Speicher mog- 
lich. 



Demoprogramme 
auf Diskette 



Urn Ihnen den Einstieg in 
Sprite + Graf ik-Basic zu er- 
leichtern, befinden sich De- 
moprogramme mit auf der 
Diskette. Achtung: Vor dem 
Laden muB die Basic-Erwei- 
terung initialisiert sein! Be- 
achten Sie dazu unsere La- 
deanweisung am Anfang. 
Laden Sie nun die erste Gra- 
fikdemo »LINE1« und starten 
Sie mit RUN. Das Beispiel- 
programm zeigt eine Varia- 
tion des LINE-Befehls mit 
Farbanderung und Moglich- 
keiten der GPRINT-Anwei- 
sung. 

Das nachste Beispiel ist 
»LINE2«. Es demonstriert, 
wie man die SIN-Funktion 
mit LINE einsetzen kann 
(Abb.1). 

Quadrate und Rechtecke 
stellen S+G-Basic vor keine 
Probleme: Das zeigt Ihnen 
unser Demo »REC«. 

»ARC« unterstreicht die 
Moglichkeit, Kreise und El- 
lipsen auf den Grafikbild- 
schirm zu zaubern (wie un- 
ser Demoprogramm be- 
weist). 

Das Beispiel »FLUG- 
ZEUG« bringt eine Verbin- 
dung von LINE und ARC 
(Abb.2). Die x- und y- 
Positionen der einzelnen 
Grafikpunkte wurden als Da- 
tazeilen definiert. Mit 
»SPRITEDEM01« wird's le- 
bendig auf dem Bildschirm. 
»SPRITEDEM02« laBt ein 
Pferd uber den Bildschirm 
laufen. Mit dem Wissen un- 
serer Demoprogramme 
durfte es ein leichtes sein, in 
kurzesterZeit ein Sprite- und 
Grafikprofi zu werden. (gr) 



Kurzinfo: Sprite + Graf ik-Basic 



Programmart: Basic-Erweiterung 

Laden: LOAD "S+G-BASIC", 8 

Starten: nach dem Laden RUN eingeben 

Besonderheiten: uber 100 neue Basic-Befehle fur Sprites, Grafik 

und strukturierte Programmierung 

Benotigte Blocks: 58 

Programmautor: Jens Schwarz 
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XBasic Plus - liber 40 neue Befehle 

Der elegante Weg 



Der Interpreter des C64 kennt weder 
Sound noch hochaufldsende Grafik. Da 
helfen nur PEEKs und POKEs - Oder unse- 
re Erweiterung. Sie macht SchluB mit um- 
standlicher Programmierung. 

von Stephan Blietz 



D 



as Basic des C64 ist nur mit den unverzichtbaren 

| Befehlen ausgestattet. Dadurch wird zwar jedes Pro- 

gramm mdglich, aber meist nur mit riesigem Speicher- 

bedarf oder nicht tolerierbarem Zeitaufwand in der Ausfuh- 

rung. Hier ist »XBasic Plus« nutzlich. Uber 40 neue Befehle 

stehen fur Sie bereit. 

Sie laden die Erweiterung mit der Anweisung: 

L0AD"XBASIC+",8 

und starten RUN. Danach meldet sich die Erweiterung mit ei- 
nem Einschaltbild. 

Bei der folgenden Beschreibung der Befehle deuten eckige 
Klammern an, daB es sich urn einen optionalen Parameter 
handelt. Die eckigen Klammern sind nicht einzugeben. Im 
Abschnitt Fehler wird erlautert, welche Fehlermeldungen auf- 
treten konnen. Ein »SYNTAX ERROR« bleibt unerwahnt, 
wenn er nur durch eine falsche Schreibweise begrundet ist. 
Das gleiche gilt fur den ..ILLEGAL QUANTITY ERROR«, der 
eine Bereichsuberschreitung der Befehlsparameter anzeigt. 
Prograrhmierhilfen 

AUTO [Schrittweite] 

Nach Eingabe einer Programmzeile wird automatisch eine 
urn Schrittweite erhohte Zeilennummer ausgegeben. Der 
AUTO-Modus wird durch Eingabe einer Leerzeile wieder ver- 
lassen. »Schrittweite« darf Werte zwischen und 255 anneh- 
men. »0« ist zwar moglich, aber nicht sinnvoll, da immer die 
gleiche Zeilennummer erscheint. Wird »Schrittweite« wegge- 
lassen, so findet eine Erhohung urn 10 statt. 

Fehler: SYNTAX ERROR - es wurde eine ungulti- 
ge Zeilennummer erzeugt (64000). 

AUTO 200 

100 IF A THEN PRINT "HALLO" 

Nach Eingabe obiger Zeilen wird die Zeilennummer 300 
automatisch vorgegeben. 

DELETE [Anfang] [Ende] 

.... loscht den durch »Anfang« und »Ende« spezifizierten 
Programmzeilenblock. »Anfang« gibt die Nummer der ersten 
Zeile und »Ende« die der letzten Zeile des Blocks an. Ist ..An- 
fang" die erste Zeile des Programms bzw. »Ende« die letzte 
Zeile des Programms, kann der jeweilige Parameter wegge- 
lassen werden. Im iibrigen gilt der ubliche Wertebereich fur 
Basic-Programmzeilen. Werden Zeilennummern von nicht 
existenten Programmzeilen angegeben oder wird DELETE 
ohne Parameter eingegeben, so hat der Befehl keine Wir- 
kung. 

Fehler: SYNTAX ERROR - es wurde eine ungultige Zeilen- 
nummer (64000) als Parameter ubergeben oder »Anfang« ist 
groBer als »Ende«. 

100 FOR 1=1 TO 100 



110 PRINT I 
120 NEXT 
DELETE 110- 

Nach Ausfuhrung von DELETE sind die Zeilen 110 und 120 
geloscht. 

DUMP 

. . . .gibt die Namen und Werte aller nicht indizierten Varia- 
bles sowie die Namen mit DEFFN definierter Funktionen 
aus. Die Reihenfolge der Ausgabe entspricht der Speicherfol- 
ge. Zur Kennzeichnung werden Integervariable durch »%« 
und Stringvariable durch »$« markiert. Funktionsbezeichner 
werden durch »*« kenntlich gemacht. Achtung: Bei einer gro- 
Ben Menge anzuzeigender Variablen kann es sein, daB der 
Bildschirm durchscrollt. Urn zu verhindern, daB Information 
verlorengeht, leiten Sie am besten die Ausgabe vorher auf ei- 
nen Drucker urn. 



10 
20 
30 

40 



A = 10.457 
C% = 16 
T$ = "HALLO' 
DEF FN G(X) 



2*X+3 

Der Befehl DUMP hat nach Ausfuhrung dieses Program m- 
fragments folgende Ausgabe zur Folge: 

A = 10.457 

C% = 16 

T$ = "HALLO" 

G* 

X = 

MEMORY 

...zeigt den momentanen Speicherbedarf von Programm 
und Variablen und den freien Speicher. 
10 A = 16.6 
20 C$ = "TEST" 
30 FOR T=l TO 100: PRINT T: NEXT 



Programmstucks erzeugt 



Nach Abarbeiten des obigen 
MEMORY folgende Ausgabe: 

Programm: 55 
Variable: 21 
Arrays : 
Strings : 
Free : 30643 

Beachten Sie, daB trotz einer String-Zuweisung im Pro- 
gramm kein String-Speicherplatz belegt wurde, da der Wert 
des Strings vollstandig im Programmtext abgelegt ist! 

RENUMBER [[Anfang], Schrittweite] 

. . . . numeriert das im Speicher befindliche Basic- 
Programm neu. »Anfang« gibt dabei die erste Zeilennummer 
an, wahrend »Schrittweite« den Abstand der Zeilennummern 
(siehe AUTO) festlegt. Die Parameter durfen alle Werte von 
gultigen Zeilennummern annehmen. Mit RENUMBER ohne 
Parameter wird das Programm mit erster Zeilennummer 10 
und Schrittweite 10 umnumeriert. Ohne »Anfang« werden die 
neuen Zeilennummern von beginnend erzeugt. RENUM- 
BER verandert auch die Parameter der Befehle GOTO und 
GOSUB entsprechend, jedoch nur wenn keine berechneten 
Zeilennummern als Sprungziele angegeben sind (siehe GO- 
SUB/GOTO). Urn eine (falsche!) Anpassung dieser Parame- 
ter zu verhindern, ist der dem Befehl folgende Ausdruck in 
Klammern zu setzen (»GOTO(200+6*5)«) und die Anpas- 
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alle Qui einen BlUk 

Die 64 er Sonderhefte bieten Ihnen untfassende 
Information in komprimierter Form zu speziellen 
Themen rund urn die Commodore C 64 und C 128. 
Ausgaben, die eine Diskette enthalten, sind mit 
einem Diskettensymbol gekennzekhnet. 



C 64, C 128, EINSTEIGER 




SH 0022: C 128 III 

Forbiges Scrolling im 
80-Zeichen Modus / 
8-Sekunden- 
Kopierprogrc 



SH 0026: Rund urn den 
C64 

Der C64 verstandlich fur Alle 
mil ausfiihrlichen 



SH 0029: C 128 
Starke Software fur C 1 28/ 

C 1 28D / Alles iiber den neuen 
C128D 




SH 0036: C 128 

Power 1 28: Directory komfor- 
tobel organisieren / Haushalts 
buch: Finanzen im Griff/ 3D- 
Landschaften ouf dem Computer 



SH 0038: Einsteiger 

Alles fur den leicbten Einstieg / 
Super Molprogromm / Tolles 
Spiel zum selbermocben / 
Mehr Spa6 am Lernen 



SH 0050: Starthilfe 

Alles fur den leicbten Einstieg / 
Heifie Rythmen mil dem C 64 
/ Fantastiscbes Malprogramm 



SH 0051: C 128 

Voile Floppy-Power mit 
"Rubikon' /Aktienverwaltung 
mit "fiorse 1 28" 



SH0058:128er 

Ubersichtlicbe Buchhaltung 
zuhause / Professionals 

Diagramme 




SH 0062: Erste Schrftte 

RAM-Exos: Disketten 
superschnell geladen/ Exbasic 
Level II: iiber 70 neue Befehle/ 
Rafinessen mil der Tastatur 



PROGRAMMIERSPRACHEN 



SH 0064: 128ER 

Anwendungen: USA Journal / 
Grundlagen: CP/M, das dritte 

Betriebssystem/VDC-Grafik: 
Vorhang auf fur hohe Auflosung 

ANWENDUNGEN 



SH 0028: Geos / 
Dateiverwaltung 
Viele Kurse zu Geos / Talle 

Geos-Programme zum Abtippen 



SH 0048: GEOS 

Mebr Speicherpbtz auf 
Geos-Diskelten / Scbneller 
Texledilor fur Geowrite / 
Kompletles Demo auf Diskette 




SH 0059: GEOS 

GeoBasic: Grofier 
Programmierkurs mil vielen Tips 
& Tricks 



SH 0035: Assembler 
Abgeschlossene Kurse fiir 
Anfonger und Fortgeschritlene 



SH 0040: Basic 

Basic Schrirl fiir Scbritt / Keine 
Chance fiir Fehler / Profi-Tools 
und viele Tips 




TIPS, TRICKS & TOOLS 




SH003I:DFU, iWusik, 
Messen-Steuern-Regeln 

Alles iiber DFil/BTX von A-Z/ 
Grundlagen / Bauanleitungen 



SH 0046: Anwendungen 

Dos erste Expertensystem fiir 
den C 64 / Bessere Noten in 
Chemie / Komfortable 
Dateiverwaltung 

HARDWARE 



SH 0056: Anwendungen 
Gewinnauswertung beim 
Systemlorto / Energie- 
verbrauch voll im Griff / 
Hohere Mottiematik und C64 



SH 0024: Tips, TricksS, Tools 
Die besten Peeks und Pokes sowie 
Utilities mit Pfiff 



SH 0043: Tips, Tricks&Tools 

Rasterinterrupls - nicht nur fiir 
Profis / Checksummer V3 und 
MSE / Programmierhilfen 



SH 0057: Tips & Tricks 

Trickreicbe Tools fiir den C64 / 
Drucker perfekl installiert 




SH 0065: Tips&Tools 

Streifzug dirch die Zeropage/ 
Drucker-Basic: 58 neue 
Befeble zur Printer-Steuerung/ 
Multicolorgrafiken 
konverlieren/ iiber 60 heifie 
Tips&Tricks 



SH 0025: 

Floppylaufwerke 
Wertvolle Tips und 
Informationen fiir Einsteiger 
und Fortgeschritlene 




SH 0032: 
Floppylaufwerke und 
Drucker 

Tips&Tools / RAM-Erweiterung 
des C64 / Druckerroulinen 



SH 0047: Drucker, Tools 

Hardcopies ohne Geheinmisse 
/ Farbige Grafiken auf 
s/w-Druckern 



SH 0067: Wetterstation: 

Temperalur, Luftdruck und 
feucnte messen/ DCF-Funkuhr 
und Echtzeiluhr/ Daten 
konverlieren: vom C64 zum 
Amiga, Atari ST und PC 



SH 0039: DTP, 
Textverorbeitung 
Komplettes DTP-Poket zum Ab- 
tippen / Super Texlsystem / 
Hochauflbsendes Zeichenprogramm 



GRAFIK 
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SH 0020: Grafik 
Grafik-Programmierung / 
Bewegungen 



SH 0045: Grafik 

Listings mil Phil / Alles iiber 
Grafik-Programmierung / 
Erweiterungen fur Arnica-Point 



SHOOSS: Grafik 

Arnica-Point: Malen wie ein Profi 
/ DTP-Seiten vom C64 / 
TricksSUtilities zur Hires-Grafik 




SPIELE 



f 

! Toile Spiele zum \ m 
j Abtippen 




SH 0063: Grafik 
Text and Grafik mischen ohne 
Flimmem / EGA: Zeichen - 
programm der Superlative / 
3 professionelle Editoren 



SH 0068: Anwendungen 

Kreuzwortratsel selbstgemacht/ 
Happy Synth: Super-Syntheziser fur 
Sound-Freaks/ Der C64 wird zum 
Planetarium/ Sir-Compact: Bit-Packer 
verdichtet Basic- und , 
Assemblerprogramme/ 



SH 0030: Spiele fiirC 64 

und CI 28 

Spiele zum Abtippen fur C 64/ 

C 1 28 / Spieleprogrammierung 




SH 0037: Spiele 

Adventure Action Geschicklich- 
keit / Profihilfen fur Spiele / 
liberblick, Tips zum Spielekauf 



SH 0042: Spiele 
Profispiele selbst gemacht / 
Adventure, Action, Strategie 



SH 0049: Spiele 

Action, Adventure, Strategie / 
Sprites selbst erslellen / viren- 
killer gegen verseuchte Disketten 




SH 0052: Abenteuerspiele 

Selbstprogrammieren: Van der 
Idee zum fertigen Spiel / So 
knacken Sie Adventures 



SH 0054: Spiele 

1 5 toile Spiele auf Diskette/ 
der Sieger unseres 
Programmierwetlbewerbs: 
Crihion 11/ ein Cracker pack) 
aus: ewige Leben bei > 
kommerziellen Spielen/ 



SH 0060: Adventures 

8 Reisen ins Land der Fantasie 
- so rnocht Spannung Spafi 






Top Spiele 1 

Die 11 1 besten Spiele im Test/ 
Tips, Tricks und Kniffe zu 
heioen Games/ 
Komplettlbsung zu "Lost Ninia 
11"/ grofle Markliibersicht: (lie 
akluellen Superspiele fur den 
C64 



SH 0061: Spiele 

20 heifie Super Games fur 
Joystick-Akrobaten/ 
Cheat-Modi und Trainer POKEs 
zu iiber 20 Profi-Spielen/ 
Krieg der Kerne: Grundlagen 
zur Spielerprogrammierung 



SH 0066: Spiele 

1 5 Top-Spiele mil Action und 
Strategie/ Mondlandung: 
verbluffend echte Simulation 
und Super-Grufik/ 
High-Score-Knacker: 
Tips&Tricks zu Action-Games 




Q^^j* *« J«™ 



our e/nen 

Diese 64'er-Ausgaben bekommen Sie noch bei 
Markt&Technik fiir jeweils /,- DM. Die Preise 
fiir Sonderhefte und Sammelbox entnehmen Sie 
bitte dem Bestellcoupon. Tragen Sie Ihre 
Bestellung im Coupon ein und schicken Sie ihn am 
besten gleich los, oder rufen Sie einfach unter 
089 - 20 25 15 28 an. 



6/90: Programmierung: endlich Basic 3.5 
fiir C64 / Softwaretest: die besten 
Fufiballprogramme / Videostudio, C64 in 
Borsenfieber 

7/90: Extratouren: CD-Musicbox mil C64 
und Bauanleitung Pulsmesser / 
Sammelposter C64 im Riesenformat 

9/90: Grofier C64-Reparaturkurs/ 
Faszination: Amateurfunk / Neuigkeiten 
aus der GEOS-Welt / Super-Spiele zum 
Abtippen 

1 0/9-0: Bauanfeitungen: 5 
Wochenend-Projekte / ECOM-das 
Super-Basic /Test: Die besten Drucker 
unter 1000 DM / C64-Reparaturkurs 

1 1/90: Bausarztest: Der 
Taschengeldplotter / Vergleichstest: 
Drucker der Spitzenklasse / 5 
Schnellbauschaltungen 

1 2/90: Abenteuer BTX / Multitasking fiir 
C64 / Grofier Spieleschwerpunkt / 
Proqrammierwettbewerb: 
30 000 DM zu gewinnen 

1/91: Die Besten Tips&Tricks /Neu: 
Reparaturecke / Floppy-Flop: 
Betriebssystemuberlistet/ 
Jahresinhaltsverzeichnis 



2/91: Sensation: Festplatte fiir den C 64 
/ Drucken ohne Arger / Listing des 
Monats: Actionspiel "Ignition" / Longplay: 
Dragon Wars 

3/91: Bauanleitung: universelles 
Track-Display / Alles Liber Module fiir den 
C 64/ Festplatte HD 20 unter GEOS 

4/91:Spiele-Schwerpunkt: 100 Tips, 
News, Tests / Neu: Grafikkurs / 
Fischer-Baukiisten / Bauanleitung: 
Digitizer 

5/91: Atzanlage unter 50.- DM/ 
GRB-Monitor am C64 / Longplay: Bard's 
Tale / Reparaturkurs: Die neuen C64 / 
Piratenknacker 

6/91: C64er-Mefilabor: universell 
Erweiterungsfahig / Test: Pocket-Wrighter 
3.0 - Bestes C64 Textprogramm / Listing 
des Monats: Autokosten im Griff 

7/9 1 : Trkkfilm mit dem C 64 / 

Bauanleitung: 1541 -Floppy mit 
Batteriebetrieb / Listing des Monats: 
Basic-Butler 

8/91: Drucker unter 1 000 DM / Test: 
GEO-RAM/ Listing des Monats: 
80-Farben-Malprogramm / Longplay: 
Secret of the Silver Plate 



BESTELLCOUPON 



Ich bestelle 64er Sonderhefte Nr. 

zum Preis von je: 1 4,- DM (Heft ohne Diskette) 
16,- DM (Heft mit Diskette) 
9,80 DM (SH "Top Spiele 1") 



24,- DM (for die Sonderhefte 0051/ 0058/ 0064) 

Ich bestelle 64er Magazin Nr. / / _ 

zum Preis von je 7,- DM 

Ich bestelle Sammelbox(en) 

zum Preis von je 14,- DM 

Gesamtbetrag 



DM 
DM 
DM 
DM 
DM 

DM 
DM 
DM 



Ich bezahle den Gesamtbetrag zzgl. Versandkosten nach Erhalt der Rechnung. 

Name, Vornome 



SlroBe, Hausnummer 




AC/14 19 
. Ich erlaube Ihnen hiermit mir interessante Zeilschriftenangebote 



PLZ, Wohnort 

Telefon (Vorwahl) 

auch telefonisch zu unterbreiten (ggf. streichen). 

Schicken Sie bitte den ausgefullten Bestellcoupon an: 64er Leserservice, CSJ, 
| Postfach 140 220, 8000 Munchen 5, Telefon 089/ 20 25 15 28 



sung spater von Hand vorzunehmen. RESTORE, BRANCH 
und EXIT werden nicht angepaBt! 

Fehler: ILLEGAL QUANTITY - die Numerierung wurde ei- 
ne ungultige Zeilennummer erzeugen. In diesem Fall wurde 
keine Numerierung durchgefiihrt. 

10 INPUT A$ 

20 IF A$="T" THEN GOTO 40 

30 PRINT "FERTIG" 

40 END 

Der Befehl RENUMBER 100,50 verandert die Numerie- 
rung wie folgt: 

100 INPUT A$ 

150 IF A$="T" THEN GOTO 250 

200 PRINT "FERTIG" 

250 END 

RESCUE 

Ein Basic-Programm, das mittels NEW Oder durch einen 
Reset geloscht wurde, wird wiederhergestellt. Voraussetzung 
ist, daB nach dem Loschen des Programms keine Programm- 
zeilen eingegeben Oder Wertzuweisungen an Variable vorge- 
nommen wurden. 

Kontrollstrukturen 

BRANCH 

Zeilennummer 

....bestimmt aus einem mittels CALL angesprungenen 
Unterprogramm nach »Zeilennummer«. 



70 IF Y=0 THEN BRANCH 40 
80 SUBEND 

Das Unterprogramm FORMEL wird nach 40 verlassen, 
wenn Y=0. 

CALL Label 

...springt zu dem durch die PROCEDURE-Zeile mit dem 
Namen »Label« gekennzeichneten Unterprogramm. Beach- 
ten Sie, daB ein solches Unterprogramm durch SUBEND ab- 
geschlossen sein muB, urn einen Stack-Uberlauf zu verhin- 
dern. Grundsatzlich durfen nur 32 Unterprogrammaufrufe 
durch CALL geschachtelt werden. 

Fehler: MISSING LABEL - CALL wurde ohne Sprungziel 
eingegeben. 

LABEL NOT FOUND - das angegebene Sprungziel exi- 
stiert nicht. 

TOO MANY CALL. . . SUBEND - die Hochstzahl von un- 
beendeten CALL-Rufen (32) wurde uberschritten. 

Beispiel: siehe BRANCH 

EXIT Zeilennummer 

. . . verzweigt aus einem von GOSUB aufgerufenen Unter- 
programm zu »Zeilennummer«. Wie bei BRANCH wird das 
Unterprogramm dadurch ordnungsgemaB verlassen, es 
kann auch hier kein Stack-Uberlauf entstehen. 

Fehler: MISSING LINENUMBER - die Zeilennummer hin- 
ter EXIT fehlt. 

UNDEF'D STATEMENT - die angegebene Zeilennummer 
existiert nicht. 

EXIT WITHOUT GOSUB - es erfolgte kein Unterpro- 
grammaufruf durch GOSUB. 



Tolle Grafiken iassen sich 

mit »SET< blitzschnell 

programmieren. Das 

Beispieldemo 

»XBASIC.DEMO« auf der 

beiliegenden Disketten zeigt 

dies. 



=n 



A 



Kurzinfo: XBasic Plus 



' 



Programmart: Basic-Erweiterung 
Laden: LOAD"XBASIC+ ",8 
Starten: nach dem Laden RUN 
Besonderheiten: iiber 40 neue Befehle 
Bendtigte Blocks: 20 
Programmautor: Stephan Blietz 



W 






Das Unterprogramm gilt damit als ordnungsgemaB verlas- 
sen, es besteht nicht die Gefahr eines Stack-Uberlaufs. 

Fehler: MISSING LINENUMBER — BRANCH wurde ohne 
Zeilennummer eingegeben. 

UNDEF'D STATEMENT — die angegebene Zeilennummer 
existiert nicht. 

BRANCH WITHOUT CALL — Es erfolgte kein Unterpro- 
grammaufruf durch CALL. 

10 X = 15 

20 CALL FORMEL 

30 PRINT Y 

40 END 

50 PROCEDURE FORMEL 

60 Y = SIN(X) 



10 X = 5 

20 GOSUB 50 

30 PRINT Y 

40 END 

50 Y = C0S(X) 

60 IF Y=0 THEN EXIT 40 

70 RETURN 

1st Y=0, wird das Unterprogramm ab Zeile 50 nach 40 
verlassen. 

JUMP Label 

...springt zur PROCEDURE-Zeile mit dem Namen Label 
und setzt dort die Programmausfuhrung fort. JUMP ist prak- 
tisch ein GOTO mit symbolischem Sprungziel. 

Fehler: MISSING LABEL - es folgt kein Sprungziel. 
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LABEL NOT FOUND - das angegebene Sprungziel konnte 
nicht gefunden werden. 

10 INPUT A 

20 IF A>10 THEN JUMP 
GROESSER 
30 A = 2*A 
40 END 

50 PROCEDURE GROESSER 
60 A = 3*A 

»lst A groBer als 10, wird in Zeile 50 gesprungen. 

PROCEDURE Label 

...weist einem Unterprogramm den Namen »Label« zu. 
JUMP und CALL rufen es aus dem Programm auf. Hinter »La- 
bel« stehende Befehle werden ignoriert. Eine Fehlermeldung 
erscheint nur, wenn versucht wird mit JUMP Oder CALL ein 
nicht existierendes Label anzuspringen. 

Beispiel: siehe »JUMP« und »CALL« 

REPEAT [Anweisungen] UNTIL Bedingung 

...erfullt die Anweisungen zwischen »REPEAT« und "UN- 
TIL" so lange, bis die Bedingung hinter UNTIL erfullt ist. Die 
Schleife wird mindestens einmal ausgefuhrt. Ein Weglassen 
der Anweisung ist nur sinnvoll, wenn auf eine Bedingung ge- 
wartet werden soil, die sich unabhangig von der Pro- 
grammausfuhrung einstellen kann (z.B. das Drucken einer 
bestimmten Taste). Stehen REPEAT und UNTIL in einer Pro- 
grammzeile, mussen sie durch Doppelpunkte von der Anwei- 
sung getrennt werden. Entsprechendes gilt, wenn der Bedin- 
gung nach UNTIL weitere Anweisungen folgen. 

Beachten Sie, daB hochstens 32 REPEAT.UNTIL- 
Schleifen geschachtelt werden diirfen. 

Fehler: TOO MANY REPEAT . . . UNTIL - es wurde versucht 
mehr als 32 REPEAT... UNTIL-Schleifen zu verschachteln. 

UNTIL WITHOUT REPEAT - es wurde ein UNTIL ohne zu- 
gehoriges REPEAT entdeckt. 

10 REPEAT 

20 A=A+1 

30 P0KE203,64 

40 REPEAT: UNTIL PEEK(603)<>64 

50 UNTIL A=100 

60 END 

Das Programm erhoht den Inhalt der Variablen A urn 1 und 
wartet dann auf einen Tastendruck. Dies wird so lange wie- 
derholt, bis A den Wert 100 hat. 

SUBEND 

... beendet ein durch CALL aufgerufenes Unterprogramm. 
Die Programmausfuhrung wird unmittelbar nach dem aufru- 
fenden CALL fortgesetzt. 

Fehler: SUBEND WITHOUT CALL - es wurde ohne CALL 
in ein Unterprogramm gesprungen. 

10 FOR 1=1 TO 10 

20 CALL DRUCKEN 

30 NEXT 

40 END 

50 PROCEDURE DRUCKEN 

60 PRINT TAB (10) I 

70 SUBEND 

Die Schleifenvariable wird durch Ansprung der Routine 
DRUCKEN ausgegeben. 

, Befehte zur Steuerung von Peripheriegeraten 

DIR Nummer 

...gibt das Inhaltsverzeichnis der Diskette im Laufwerk 
Nummer aus. Die Ausgabe kann durch Festhalten der CTRL- 
Taste verlangsamt werden. Im Gegensatz zum Laden mit 
»LOAD"$" ,8,1« bleibt das im Speicher befindliche Programm 
erhalten. Nummer darf die Werte 8 und 9 annehmen. 



ERROR 

. . . liest den Fehlerkanal des Diskettenlaufwerks mit der Ge- 
ratenummer 8 aus und zeigt das Ergebnis an. 

HCOPY 

Eine Hardcopy des Textbildschirms im Gro6-/Grafikmodus 
wird auf dem Drucker (Geratenummer 4) ausgegeben. Es 
eignen sich alle zum C64 kompatiblen Drucker. 

Befehle zur Tonerzeugung 

ENVELOPE Stimme Nr,A,D,S,R 

...ladt den Hullkurvengenerator der Stimme »Stimm 
Nr« mit den Werten »A« (Attack), »D« (Decay), »S« (Sustain) 
und »R« (Release). »StimmNr« muB im Bereich 1 bis 3, die 
ubrigen Parameter im Bereich bis 15 liegen (s. Handbuch). 

ENVELOPE 1,5,10,12,4 

setzt die Hullkurve fur Stimme 1. 

VOL Lautstarke 

Die Lautstarke wird fur alle Stimmen auf den angebenen 
Wert gesetzt. Sie darf Werte von bis 15 annehmen. 

WAVE StimmNr,Steuerwort 

. . . ladt das Steuerregister (Register 4,11 Oder 18) der durch 
»StimmNr« (s. ENVELOPE) spezifizierten Stimme wird mit 
Steuerwort geladen. Steuerwort ist eine 8-Bit-Binarzahl, die 
nur aus »0« und »1« bestehen darf (z.B 00100101). Die einzel- 
nen Bits schalten die Wellenform (Rauschen, Rechteck, Sa- 
gezahn und Dreieck) und andere Parameter (Test, Ringmodu- 
lation, Synchronisation und Ein/Aus) an (»1«) und aus (»0«). 
Naheres hierzu finden sie auch im Sonderheft Nr. 11, zu be- 
stellen bei CSJ, Tel: 089/20251527. Preis: 14 Mark. 

Fehler: SYNTAX ERROR - das Steuerwort hat eine falsche 
Form (keine acht Stellen Oder falsche Zeichen). 
WAVE 2,01000001 

...wahlt Wellenform Rechteck fiir Stimme 2 und schaltet 
diese ein. 

Blockgrafik (Textmodus) 

BORDER Farbe 

...setzt die Farbe des Bildschirmrahmens auf den Wert 
von »Farbe«. Farbe kann zwar zwischen und 255 liegen, 
Werte uber 15 sind aber nicht sinnvoll, da sich die 16 mogli- 
chen Farben (0 bis 15) standig wiederholen. So entspricht 
»0 bis 15« dem Bereich »16 bis 31« und »32 bis 47« usw. 

BORDER 1 

...erzeugt einen weiBen Bildschirmrahmen. 

FILL x,y,Lange,H6he,Code 

. . . fOllt ein Rechteck mit horizontaler Ausdehnung »Lange« 
und vertikaler Ausdehnung »H6he« mit dem Zeichen »Code« 
(Bildschirmcode). Die Koordinaten der linken oberen Ecke 
sind »x,y«. Sollte das Rechteck nicht ganz in das Video-RAM 
passen, werden die uberstehenden Teile abgeschnitten (oh- 
ne Fehlermeldung). »Lange« und »x« muB im Bereich von 
bis 39 liegen, fur »H6he« und »y« ist bis 24 erlaubt. »Code« 
liegt zwischen und 255. 

Beachten Sie, daB die Zeichen unsichtbar bleiben, wenn 
die entsprechenden Bytes im Farb-RAM mit der Hintergrund- 
farbe belegt sind. 

FILL arbeitet auch dann korrekt, wenn das Video-RAM ver- 
schoben wurde, vorausgesetzt, das Highbyte der neuen « 
Adresse wurde in 0288 hex abgelegt. 
10 FILL 0,0,39,24,1 
20 PAINT 0,0,39,24,2 

Der gesamte Bildschirm wird mit schwarzen A's gefiillt (s.a. 
»PAINT«). 
INK Farbe 
... setzt die Zeichenfarbe (s. »BORDER«). 
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INK 

. . . bewirkt, daB alle folgenden Zeichen in Schwarz ausge- 
geben werden. 

PAINT x,y,Lange,H6he, Farbe 

. . .farbt ein Rechteck mit dem Wert von »Farbe«. Die Para- 
meter entsprechen denen von »FILL« mit Ausnahme von 
»Farbe« (s. »BORDER«). FILL hat nur eine sichtbare Wirkung 
wenn der Bildschirm nicht geloscht ist. 

Beispiel: s. »PAINT« 

PAPER Farbe 

...setzt die Hintergrundfarbe (s. »BORDER«). 
PAPER 6 

...erzeugt einen blauen Hintergrund. 

Hochauflosende Grafik 



Im hochauflosenden Modus verschiebt sich das Video- 
RAM, das als Farb-RAM dient, nach $C000 (49152) und die 
Hires-Bitmap liegt ab $E000 (57344). 

CLEAR 

Der Grafikbildschirm wird geloscht. 

HRG Punkt.Hintergrund 

. . .schaltet den VIC in den hochauflosenden Single-Color- 
Grafikmodus und initialisiert das Farb-RAM mit den Werten 
»Punkt« fur die Punktfarbe und »Hintergrund« fur die Hinter- 
grundfarbe. Die beiden Parameter durfen Werte von bis 15 
annehmen. Nach Beenden eines Programms kehrt der 
Rechner automatisch in den Textmodus zuruck. 

HRG 1,0 

. . . schaltet in den hochauflosenden Grafikmodus und setzt 
WeiB als Punktfarbe und Schwarz als Hintergrundfarbe. 
INVERS x,y 

. . . invertiert den Grafikpunkt mit den Koordinaten »x« (0 bis 
319) und »y« (0 bis 199). 

10 HRG 6,14 

20 CLEAR 

30 FOR X=0 TO 319: INVERS X,100: NEXT 

...zieht eine dunkelblaue Linie auf hellblauem Hinter- 
grund. 
RESET x,y 

. . . loscht den Grafikpunkt mit den Koordinaten »x,y« (Para- 
meter s. »INVERS«). 

40 FOR X=0 TO 319: RESET X, 
100: NEXT 

...loscht die beim Beispiel INVERS gezogene Linie. 
REVERS 

Der gesamte Grafikschirm wird invertiert. 
SET x,y 

. . . setzt einen Grafikpunkt mit den Koordinaten »x,y«. (Para- 
meter s. »INVERS«). 

10 HRG 1,0 

20 CLEAR 

30 FOR X=100 TO 220: SET X,50: SET X,150: NEXT 

40 FOR Y=50 TO 150: SET 100, Y: SET 220, Y: NEXT 

Am Bildschirm wird ein weiBer Rahmen auf schwarzem 
Grund gezeichnet (s. a. 'XBASIC.Demo' auf Diskette und 
Abb.). 

TEXT 

...schaltet den VIC zuruck in den Textmodus. 

Zeichensatzveranderung 

Beim Umschalten auf den eigenen Zeichensatz verschiebt 
sich das Video-RAM nach $C400 (50176). Gleichzeitig andert 
sich auch die Lage des 16 KByte groBen AdreBbereich des 
VIC im Hauptspeicher auf $C000 (49152). Beachten Sie dies 
bei den Sprite-Befehlen. Die Blockgrafikbefehle stellen sich 
automatisch auf die neuen Bereiche ein. 



CHRCOPY 

...kopiert den Commodore-Zeichensatz vom ROM ins 
RAM ab $C800 (51200). Dort kann er jetzt durch die neuen 
Befehle modifiziert werden. Wenn ein Zeichensatz komplett 
neu kreiert wird, kann CHRCOPY auch weggelassen werden. 

Beispiel: siehe CREATE 

CREATE Code,Byte1,Byte2, . . . ,Byte8 

...definiert das Zeichen mit dem Bildschirmcode »Code« 
im neuen Zeichensatz durch Byte 1 bis Byte 8 neu. Alle Para- 
meter durfen den Wertebereich bis 255 annehmen. 

10 CHRCOPY 

20 CREATE 1,0,0,255,126,60,24,0,0 

30 RAM 

Der Originalzeichensatz wird ins RAM kopiert und an- 
schlieBend das Zeichen mit dem Bildschirmcode 1 (A) modifi- 
ziert. Die Byte-Folge definiert einen Pfeil nach unten. 

RAM 

. . . schaltet vom ROM-Zeichensatz auf den im RAM liegen- 
den urn. 

Beispiel: siehe CREATE 

Sprite-Grafik 

Achtung beim Parameter »Block«: 

Er gibt an, aus welchen Speicherplatzen die Daten zur Dar- 
stellung eines Sprites genommen werden. Ein Block ist im- 
mer 64 Byte groB. Da der VIC nur 16 KByte adressieren kann, 
sind 256 Blocke (0 bis 255) moglich. Im Textmodus durfen die 
Blocke bis 10 nicht benutzt werden, da hier wichtige Adres- 
sen des Betriebssystems liegen. Die Startadresse eines 
Blocks errechnet sich einfach aus OFFSET + 64 * Block- 
nummer. OFFSET hangt von der aktuellen Lage des VIC- 
AdreBraums in Speicher ab. Im Textmodus ist OFFSET 0. Be- 
nutzt man hochauflosende Grafik Oder den RAM- 
Zeichensatz, so hat OFFSET den Wert 49152. 

KILL [Nummer] 

. . .schaltet das Sprite »Nummer« aus. KILL ohne Parame- 
ter wirkt fur alle Sprites. »Nummer« muB im Bereich bis 7 lie- 
gen. 

Beispiel: siehe SPRITE 

MOBEX Nummer,Richtung 

. . .dehnt das Sprite »Nummer« in »Richtung« aus. Der Wer- 
tebereich von Nummer ist bis 7; Richtung darf Werte von 
bis 3 annehmen: 

- keine Expansion, normale GroBe 

1 - Expansion in x-Richtung 

2 - Expansion in y-Richtung 

3 - Expansion in x- und Y-Richtung 
Beispiel: siehe SPRITE 

MULTI Farbe1,Farbe2 

. . . »Farbe1« und »Farbe2« legen die Farben zur Darstellung 
von Multicolor-Sprites fest. Beide Parameter mussen im Be- 
reich bis 255 liegen (s. »BORDER«). 
Beispiel: siehe SPRITE 
SPRITE Nummer,x,y,Block,Farbe,Modus 
. . . laBt Sprite »Nummer« an den Koordinaten »x,y« erschei- 
nen. Seine Daten stehen in Block und es erscheint in Farbe. 
Ist »Modus« = 1, so wird das Sprite in Multicolor dargestellt, 
wobei die durch MULTI definierten Farben verwendet werden. 
Wenn Modus = 0, erscheint das Sprite einfarbig. Andere 
Werte sind fur »Modus« nicht zulassig. Die Koordinaten mus- 
sen fur »x« im Bereich bis 511 und fur »y« zwischen und 
255 liegen. 
10 MULTI 2,6 
20 FOR X=0 TO 300 
30 SPRITE 0,X,120,11,0,1 
40 IF X=150 THEN MOBEX 0,3 
50 NEXT 
60 KILL 
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Sprite »0« bewegt sich etwa in der Mitte des Bildschirms 
von links nach rechts. Es erscheint im Multicolormodus in den 
Farben Schwarz, Rot und Blau und bezieht sein Bit-Muster 
aus Block 11. Nach der Halfte des Weges wird es in beide 
Richtungen expandiert. Zum SchluB wird es wieder vom Bild- 
schirm geloscht. 

Sprite-Grafik und Zeichensatztnanipulationen 

Die folgenden Befehle sind sowohl auf Zeichensatze, als 
auch auf die Sprite-Grafik anwendbar. Der erste Parameter 
entscheidet uber die Verwendung. 1st sein Wert »0«, bezieht 
sich der Befehl auf den Zeichensatz, wird er auf »1« gesetzt, 
ist Sprite-Grafik betroffen. Andere Werte sind nicht zulassig. 
»Block« bezieht sich immer auf den OFFSET (s.o.), auch 
dann, wenn der VIC-AdreBbereich ab OFFSET 49152 be- 
ginnt. Das bedeutet: 

Werden Sprites und hochauflosende Grafik und/oder 
RAM-Zeichensatze gleichzeitig benutzt, sind die folgenden 
Befehle unwirksam. Falls Sie die Befehle trotzdem benutzen, 
mussen die Blocke - nach Ausfuhrung - in die korrespondie- 
renden Blocke mit neuem OFFSET kopiert werden. Folgende 
Befehlsfolge leistet dies (s.a. DOKE): 
DOKE 95,ll*Block (alte Anfangsadresse) 

DOKE 90,ll#(Block+l) (alte Endadresse+1) 

DOKE 88,49152+ll*(Block+l)(neue Endadresse+1) 
SYS 41919 (Blockverschieberoutine) 

CHANGE 0,Code,ByteNr,Byte 

Oder 

CHANGE 1,Block,x,y,Byte 

. . . legt im Zeichen mit Bildschirmcode »Code« (0 bis 255) 
das »Byte« (0 bis 255) an der durch »ByteNr« (0 bis 7) definier- 
ten Stelle ab. Fur CHANGE 1 gilt: Im Sprite-Datenblock 
»Block« (0 bis 255) wird Byte (0 bis 255) in die durch x (0 bis 
2) und y (0 bis 22) gekennzeichnete Speicherstelle geschrie- 
ben. 

CHANGE 1,20,1,10,37 

. . . legt den Wert 37 im Sprite-Datenblock 20 an Position 
1,10 ab. 

MOVE0,Code1,Code2 

MOVE 1,Block1,Block2 

. . . ersetzt im Zeichensatz das Zeichen mit Bildschirmcode 
Code 2 (0 bis 255) durch das Zeichen mit Code 1 (0 bis 255) 
Oder uberschreibt den Sprite-Datenblock Block 2 (0 bis 255) 
mit den Daten aus Sprite-Datenblock Block 1 (0 bis 255). 

MOVE 0,1,2 



. . . kopiert Zeichen 1 in Zeichen 2. 
NEGATE OOode 
NEGATE 1, Block 

. . . invertiert das Zeichen mit Bildschirmcode »Code« (0 bis 
255) Oder den Sprite-Datenblock »Block« (0 bis 255). 

NEGATE 1,16 

. . . invertiert den Sprite-Datenblock 16. 

OVER0,Code1,Code2 

OVER 1,Block1,Block2 

. . . verknupft die Zeichen mit den Bildschirmcodes »Code1« 
und »Code2« (0 bis 255) bzw. die Daten der Sprite- 
Datenblocke »Block1« und »Block2« (0 bis 255) bitweise OR. 
Das Ergebnis steht im Zeichen »Code2« bzw. im Spritedaten- 
block »Block2«. 

OVER 1,11,23 



...legt in Block 23 das Ergebnis der bitweisen 
Verknupfung von Block 11 und Block 23 ab. 

Sonstige Befehle 



OR- 



DOKE AdresseWort 

. . . legt »Wort« (0..65535) ab »Adresse« (0..65535) im Spei- 
cher ab. Dieser Befehl entspricht der Befehlsfolge POKE 
AdresseWort-256* 

INT(Wort/256): POKE Adresse+1 Wort/256. 

DOKE 55,8192 

. . .setzt das Basic-RAM-Ende auf 8192. 
Befehlsmodifikationen 
GOSUB Rechnung oder GOTO Rechnung 

. . .erlaubt bei GOTO und GOSUB eine berechnete Zeilen- 
nummer. »Rechnung« darf die erlaubten Zeilennummern 
nicht uber, oder unterschreiten. 

10 INPUT A 

20 IF A<1 OR A>10 THEN 10 

30 GOSUB 100+100*A 

Beachten Sie daB diese Sprungziele von RENUMBER 
nicht korrekt umgewandelt werden! 

RESTORE Zeilennummer 

...setzt die DATA-Zeiger auf »Zeilennummer«. 

RESTORE 110 

PRINT AT(x,y) 

. . . erlaubt die formatierte Ausgabe von Texten an die durch 
»x« (0 bis 39) und »y« (0 bis 24) definierte Position. 

PRINT AT (10, 10) "HALLO" 

. . .gibt das Wort HALLO ab Spalte 10, Zeile 10 aus. 
XBasic Plus bietet Ihnen iiber 40 Befehle. Nach geringer 
Einarbeitung gelingen Ihnen die tollsten Programme, (gr) 
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Eine wahre Fundgrube niitzlicher 
Anwendungen 

gibt es im neuen 128'er Sonderheft 70 

■ »Vereinsverwaltung«, zum Erfassen 
und Pflegen des Mitgliederbestands je- 
des Vereins, Festsetzung und Uberwa- 
chung der Beitrage sowie Ausdruck der 
Lastschriftbelege. 



■ Wer jetzt schon wissen will, wieviel 
Rendite seine Geldanlage bringt, dem 
zeigt »Kapital« den Weg zum Reichtum. 
Weg mit dem Sparstrumpf. 

■ Energie sparen heiBt das Gebot der 
Stunde. Uberwachen Sie mit »Energie 
128« Ihren Gas-, Strom- und Wasserver- 
brauch. 

■ Mit CP/M machen Sie mehr aus Ih- 
rem C 128. Wie, dariiber informiert Sie 
unser zweiter Grundlagenartikel. 

■ Nutzliche Tips und Tricks in Hulle und 
Fulle, nicht nur zur 80-Zeichen-Grafik, 
erwarten den C-128-Fan in diesem Heft. 

■ Auch unsere Hardware-Freaks kom- 
men nicht zu kurz: Das EPROM »RAM- 
Flop.Small« bietet zusatzlich 110 freie 
Blocke zum Speichern beliebiger Pro- 
gramme und Dateien. 




Nr. 70 gibt's ab 27.9.91 
bei Ihrem Zeitschriftenhandler. 

Aus aktuellen Oder technischen Grunden kdnnen sich Themen verschieben. 



henfolge auf und bringt die 
jeweiligen Variableninhalte 
nach Tastendruck auf den 
Bildschirm. Dazwischen 
wird erneut die Datenzeile 
des Hauptprogramms aus- 
gegeben - als Beweis, daB 
die Routine funktioniert. 

(Stephan Patzold/bl) 

Dezimaler Disas- 
sembler 



Jeder Maschinensprache- 
monitor kennt diese Func- 
tion: das Disassemblieren 
von Speicherbereichen. Die 
Inhalte der betreffenden 
Adressen werden auf dem 
Bildschirm gezeigt, aufge- 
reiht wie auf einer Per- 
lenschnur. Wer sich mit Hex- 
zahlen nicht auskennt, sollte 
das Utility minidisass ver- 
wenden. Aus Platzgrunden 
auf dem Bildschirm werden 



immer nur drei Byte-lnhalte 
gezeigt, rechts daneben er- 
kennt man die ASCII-Werte. 
Wenn Sie das Programm 
gestartet haben, mussen 
Sie die Startadresse des ge- 
wunschten Bereichs ange- 
ben, den Sie auslesen 
mochten. Versuchen Sie's 
einmal mit Adresse 41117 
(dort liegen die Texte der 
Basic-Befehle im Interpre- 
ter-ROM). Sie konnen die 
iiber den Bildschirm hu- 
schende Liste mit jeder be- 
liebigen Taste stoppen. Das 
Utility eignet sich ideal zum 
Auslesen Oder Uberprufen 
von Sprite-Bereichen: 3 By- 
te bilden immer eine Sprite- 
Zeile! (Volker Hilt/bl) 



oder Berechnungen Werte 
auf, die kleiner als »0« sind, 
z.B. »0,57« oder »0,89«, 
bringt Sie der Computer 
ziemlich verunstaltet: .57 
oder .89 - die Null ist ver- 
schwunden! Noch schlim- 
mer wird's, wenn die Zahl 
auch mit Null endet (z.B. 
0,30). Die Bildschirmausga- 
be sieht katastrophal aus: .3! 

Mit der Basic-Routine 
nullen laBt sich dieses Man- 
ko aber ausgleichen. Hat die 
Zahl weder vorne noch hin- 
ten eine Null, fugt das Pro- 
gramm beide an. Man muB 
berucksichtigen, daB die 
Zahl (gespeichert in der nu- 
merischen Variablen A) in 
A$ umgewandelt wird. 

Ein weiterer Schwach- 
punkt des C64: Er gibt Zah- 
len nicht bundig untereinan- 
der aus. 

w ~~^~^^~^~~-^~~~ PRINT 1/10: PRINT 10 

Treten bei Zahleneingaben Sie erhalten folgende Bild- 



Null Problemo 



schirmausgabe: 

.1 
10 

Mit dem Trick einer TAB- 
Anweisung laBt sich dieses 
Manko ausgleichen: 

PRINT TAB((Z>99.99) + (Z>9 
.99)+X);Z 

X ist die Variable, die den 
Abstand vom linken Bild- 
schirmrand fixiert. 

Der folgende Basic- 
Einzeiler erzeugt in einer 
FOR-NEXT-Schleife jede 
Menge Zahlen mit Nach- 
kommastellen: 

10 for z=l to 120 step .91: 
prlnttab((z>99.99) + (z> 
9.99) 

+x);z: next 

In Verbindung mit der 
Routine fur die Null-Anhang- 
sel laBt sich so eine brauch- 
bare Bildschirmausgabe fur 
Zahlentabellen erzeugen. 
(Ingbert Nies/W. Reh/bl) 
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COME AND 
GET IT! 



MarW Technik 

6S 60,-/sfr. 7,- 

Lit. 7400/hfi 9/ 
fmk 22.- 




in 



Game Boy 
Mega Drive 
Nintendo 
Master System 
Super Famicom 

ine 
Lynx 1 



SPIELE AUF 
EINEN BUCK 
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AB 12.06.91 

IM 
ZEITSCHRIFTENHANDEL! 



MACHT DEN 




64'er - die einzige Zeitschrift, 
die Alles urn und iiber den 
C64/C128 bringt - kompetent, 
umfassend, leicht verstandlich 
und sofort anzuwenden! 

Testet jetzt 64'er - 

im Test-Angebot mit 3 Ausga- 
ben fiir nur 19,50 DM Oder holt 
es Euch direkt im Zeitschriften- 
handel! 
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Diese Themen 
erwarten Euch in 
der Ausgabe 9/91 : 



¥■ 
¥- 



Die besten Drucker: GroBer 
Vergieichstest 24-Nadler bis 
1500 DM und Marktiibersicht 

GroRer Joystickteil: 
6 Top-Joysticks im Test 
Bebilderte Marktiibersicht 
Dynamics Interview 

BTX-Modul-Erweiterung: Die 
Online-Kosten immer im Griff 



»Dir-Printer« bringt den Inhalt 
Ihrer Disketten klein und 
mehrspaltig zu Papier 



Raubkopierer-Story: Wie man 
sich vor Prozessen schiitzt 



Listing des Monats: 
»Bundesliga V3.0« mit den 
Mannschaftspaarungen der 
Saison 91/92. 
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